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The SDK 8085 CPU System Design contains 

all the parts with which you can build a complete 
8085 microcomputer system on a single board, and 
a library of 8085 literature to help you learn to 
use it. The finished computer has the following 
built-in features: 


e@ High-performance, 3-MHz 8085 cpu (1.3 us 
instruction cycle) 


e Popular 8080A Instruction Set 
Direct Teletypewriter Interface 


Interactive LED Display 
System Monitor Software in ROM 


The computer operate, using its built-in display and 
keyboard. 

You can, for example, access up to 64K of external 
memory via the expansion bus. 


DESCRIPTION 


SDK SPECIFICATIONS 


Central Processor 


CPU: 8085 
Instruction Cycle: 1.3 microsecond 
Tey: 330 ns 


Memory 


ROM: 2K bytes (expandable to 6K bytes) 


RAM: 256 bytes (8155) 
+2K bytes (expandable ) 


Addressing: ROM 0000-07 FF 
RAM 2000- 27FF 
RAM 0800-08F F (8155) 


Input/Output 


Parallel: 18 lines 


Serial: Through SID/SOD ports of 8085. Software 
generated baud rate. 


Baud Rate: 600 
Interfaces 


Bus: All signals TT L compatible. 
Parallel 1/O: All signals TTL compatible. 
Serial !/O: All signals TTL compatible. 


WHAT IT DOES 


The things you can do with the basic SDK 8085 
are: 


e Examine the contents of all memory and reg- 
ister locations 


e Deposit program steps or data in RAM or 
register locations 


e Execute subroutines upon 


command 


programs or 


e Reset (start) the monitor upon command 


e Interrupt and start operation at a location 
you specify upon command 


You may select either the keyboard and display on 
the board or a teletypewriter as the console device 
by operating a switch or by placing a jumper wire 
at the appropriate place on the board. (See Chapter 
3.) Keyboard/display operation and teletypewriter 
operation are described separately in the following 
paragraphs. 


Two of the keyboard buttons continue to function 
in teletypewriter mode, as well as in keyboard/dis- 
play mode. These are the fess] and the [i] keys. 


THE BUTTONS AND DISPLAYS 


Keyboard/display operation is done by pressing 
keys on the keypad. Responses are displayed either 
by echoing the key pressed or by prompting you 
with a message or prompt. When the fuse] button is 
pressed, the monitor is ready to accept commands. 
For numeric arguments, the valid range is from 1 
to 4hexadecimal digits for address information and 
1 to 2 hex digits for register and memory data. 


Longer numbers may be entered, but such numbers 
will be evaluated modulo 216 or 28 respectively, 


OPERATING INSTRUCTIONS 


i.e., only the last four or the last two digits en- 
tered will be accepted. 


As noted, the number system being used in the 
SDK 8085 is the hexadecimal, or base-16 number 
system. Table 4-1 lists the hexadecimal, decimal 
(base 10), and binary (base two) equivalents. The 
table also shows how each hex digit will appear in 
the seven-segment LED displays. 
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Whenever the monitor expects a command, the dis- 
play shows a dash (““—"’) at the left edge of the 
address field (possibly along with an error mes- 
sage). When the monitor expects a parameter, a 
decimal point wili be displayed at the right edge of 
the field into which the argument will be placed. A 
parameter will be either an address or a byte of 
data which is used during the execution of a 
command. 


In the descriptions of the command modes, upper 
case letters and numbers enclosed in boxes repre- 
sent keyboard keys. Words or phrases in lower case 


enclosed in brackets ““<>"’ describe the nature of 
the command parameters you may input. 


The {) in the Format Statement indicates an op- 
tional argument. 


Reset: 


The fuse] key causes a hardware reset, and starts 
the monitor. Tne messaye “-80 85” will be dis- 
played across the address and data field of the dis- 
play if you are in display-keyboard mode. If in 
teletypewriter mode, the sign on message “SDK” 
will be printed. The monitor is ready to 

accept a command after a reset, and saves no infor- 
mation about the state of any user program before 
the reset. 


Substitute Memory: 


[ws] <address> [=| (<data>) [*"](<data>) ae 


The substitute memory command allows you to 
read the contents of ROM memory and to examine 
and modify the contents of RAM memory 
locations. 


The address argument denotes the contents of the 
memory address to be examined, and may be from 
1 to 4 hex digits. If you enter longer numbers, only 
the last 4 digits entered are used). As soon as the 
number is terminated by the [=] key, the contents 
of that location are shown in the data field, along 
with a decimal point at the right edge of the field. 
Entering a new number will cause that number to 
be displayed in the data field; however, the con- 
tents of the memory location will not be changed 
until an [®*] or [*"] key is pressed. 


Pressing [<] will place the contents displayed in the 
data field into the displayed memory address. Then 
the address and contents of the next higher mem- 
ory location will automatically be shown. Pressing 
[=] will place the contents displayed in the data 
field into the memory address displayed in the ad- 
dress field, and will also terminate the command. 


Pressing ("| while the address FFFF is being dis- 
played will cause address 0000 to be displayed. 


Whenever the command changes the contents of a 
memory location, it also verifies that the change 
has occurred correctly. If the contents of the loca- 
tion do not agree with what the new value should 
be (i.e., if the memory location is in ROM or is 
nonexistent), an error message is generated. 


SUBSTITUTE MEMORY EXAMPLE 
Using to enter a small program: 


KEY ADDR DATA 


[2] 
[2] 
[ol 
[=] 
[=] 
[=] 


NOTE: ** represents unpredictable values. 


After loading the above program, use 
again to go back and check locations 2000- 
2002 to see that they contain: 


CORRESPONDING 
8085 ASSEMBLY 
LANGUAGE 
ADDRESS DATA INSTRUCTIONS 


2000 3E MVI A, 47H 
2001 47 
2002 CF RST 1 


This program will load the A register with the 
number 47 and jump back to the monitor. 


Examine Registers: 


<reg> [=] (<data>) [=] (<data>)... [a] 


The examine command allows you to display and 
modify the contents of the 8085 CPU registers. 
Pressing the [at] key blanks both the address and 
data fields, and displays a decimal point at the right 
edge of the address field. At this point, you must 
press a register key (register names are denoted by 
legends on the keyboard). Any other key will gen- 
erate an error response. 


If a register key is pressed, the name of the register 
will appear in the address field, and the contents of 
the register will appear in the data field, along 
with a decimal point at the right hand edge. 
Entering a number will cause the number to be 
displayed in the data field; however, the contents 
of the register will not be changed until an [=] or 
(ae key is pressed. 


Pressing [<] will place the contents displayed in the 
data field into the register named in the address 
field, then will display the name and contents of 
the next register in sequence (See Table). Pressing 

will place the contents displayed in the data 
field in the register named in the address field, and 
will also terminate the command. 


Pressing [=] while register PCL is being displayed 
has the same effect as pressing [#*] . 


The format for the | register is the lower 4 bits of 
the accumulator following execution of a RIM 
instruction. A “1” in an interrupt mask field de- 
notes a masked condition. A ‘‘0” must be entered 
to use that interrupt. 


The format for the | register is: 
7 


0 
M 
7.5 
——— 


a INTERRUPT MASK 


INTERRUPT ENABLE FLAG 


REGISTER DISPLAY SEQUENCE 


KEY/DISPLAY 
CODE REGISTER 


CPU register A 
CPU register B 
CPU register C 
CPU register D 
CPU register E 
CPU flags byte 
interrupt mask 
CPU register H 
CPU register L 


most significant byte of 
stack pointer 


nmmoodndow py 


least significant byte of 
stack pointer 


most significant byte of 
program counter 


least significant byte of 
program counter 


The flag byte contains the 8085 CPU's condition 
flags. 


The format for the flag byte is: 


7 0 


| ine CARRY 
PARITY 


AUX CARRY 
ZERO 

SIGN 

X = UNDEFINED 


EXAMINE REGISTER EXAMPLE EXAMINE REGISTER EXAMPLE 


Using [Fat] to initialize the 8085's stack pointer Using [Ha] to examine the contents of the 
to 20C8: 8085's Registers: 


ADDR DATA 


< 


KE ADDR DATA KE 


< 


C2) (2) C2) £2) ) 


[o] 
= 


[2] [3] (3 ‘§ 
a 
= ii 


[eof] . = 
NOTE: ** represents the contents of the 


register whose name is in the address 
field of the display. 


Go: 


(<address>) 


Pressing the [~ | key causes the contents of the pro- 
gram counter (PCH and PCL) to be displayed in 
the addressed field, along with a decimal point at 
ine right edge of ihe fieid. The program counter is 
available for change, and any number entered (a 
number is optional) becomes the new contents of 
the program counter. 


Pressing the [2] key transfers control of the CPU 
to the address in the address field (contents of the 
program counter). Before the transfer of control, 
the address and data display fields are cleared, and 
an ‘E’ is displayed at the left edge of the address 
field. 


Pressing any other key but [®*] generates an error 
message. 


The monitor regains control of the CPU only after 
a [ise] or after execution of an RST O, RST 1, or 
JMP 0 instruction in program. 


Note that because of the way the GO and SINGLE 
STEP commands are implemented in the Monitor, 
[ # Jand fae] will not work unless the 8085's stack 
pointer is pointing to an existing portion of RAM 
memory. If at any time these two commands don’t 
seem to be working, set SPH to 08 and SPL to C8 
using [94], then try it again. (Locations 08C8 to 
O8FF are reserved for the monitor program, there- 
fore the stack pointer must be set to O8C8 or lower 
so as not to interfere with the monitor.) 


GO COMMAND EXAMPLE 


Now you can execute the program you en- 
tered in Example 2 of the fas] command. 
First, check to make sure the 3- location pro- 
gram is in memory, then the program will be 
executed. 


A 


EY: ADDR DATA COMMENTS 


0002. 

0020. 

0200. 

2000. 

2000 . MVIA, 47 
2001 

2002 ; RST 1 


HEHE 


0002. 
0020. 
0200. 
2000. 
- 80 8&8 


NOTE: **** denotes “don’t care’ values 


[=] 
[= 
[J 
Ps] 
[o] 
[] 


Recall that this small program loads the A 
register with the number 47 and restarts the 
monitor. To verify that the A register now 
holds 47 and to get more practice using 
try the following sequence: 


KEY ADDR DATA COMMENT 


A reg now 
holds 47. 


Now A holds 
0 


El tf] Cle 


fe] fe) fe] 


Run the small 
Program again 


[>] b] [4] fe] [el 


47 Now A holds 
47 again 


Now try placing other values in location 2001 
using [wer] and use to execute the program 
again, seeing how those values are loaded into 
the A register after execution. 


Single Step: 
(<address>) [@] [] ... [==] 


Pressing the [28] key causes the contents of the 
program counter (PCH and PCL) to be displayed 
in the address field of the display along with a deci- 
mal point at the right hand edge of the field. The 
data field contains the contents of the address 
denoted by the contents of the program counter. 
The program counter is made available for change, 
and any number entered (a number is optional) 
becomes the new contents of the program counter. 


Pressing the [=] key causes the CPU to execute the 
one instruction pointed to by the program 
counter. After execution the monitor regains con- 
trol of the CPU, and the address and data fields 
show the new contents of the program counter 
(address of next instruction to execute) and con- 
tents of the byte addressed by the program 
counter, respectively. The decimal point is turned 
on at the right hand edge of the address field, indi- 
cating that the program counter is available again. 


If the [ae] key is pressed, no instruction is executed. 
The address displayed in the address field is made 
the contents of the program counter and the single 
step command is terminated. You may now exam- 
ine or modify registers and memory locations to 
verify program execution. Pressing the [%#'] key 
takes you back to the single step mode, and sub- 
sequent pressing of the key allows you to con- 
tinue, instruction by instruction, through your 
program. 


Vector Interrupt: 
ADDR COMMAND 


0800 RSET5 JUMP TO RST 5 ROUTINE 
0803 RSET6 JUMP TO RST 6 ROUTINE 


Single stepping is implemented in the SDK8085 
hardware by repeatedly interrupting the processor. 
Since interrupts cannot be recognized during the 
El and DI instructions of the 8085, single step will 
not stop at either of these instructions. 


SINGLE STEP EXAMPLE 


Single stepping through the SDK-85 Monitor. 
This is what you should see on the display: 


KEY ADDR DATA 
0008. 

=| 000b. E1 
[=| 000C. 22 
[=] OOOF. F5 
[=] 0010. E1 


To resume full speed operation at this point, 
do the following: 


0806 RST65 JUMP TO RST 6.5 (HARDWIRED USER INTERRUPT) 
0809 RSET7 JUMP TO RST 7 ROUTINE 
080C USINT JUMP TO "VECTORED INTERRUPT" KEY ROUTINE 


Vector Interrupt: 


The key is similar to the [« ] key in the respect 
that it takes control away from the monitor and 
gives it to another program. The interrupt key 
causes immediate recognition of RST 7.5 interrupt 
and control passes to location 3C in the monitor. 
This location contains an unconditional branch to 
instruction location O80C in user RAM. You may 
place any instruction you wish in Locations O080C 
thru O80E (e.g., a branch to a keyboard interrupt 
routine). The monitor does not regain control with- 
out specific action (a fe] command, or a RST 0, 
RST 1, or JMP 0 program instruction). In branching 
back to the monitor, unless the RST 1 instruction is 
executed, the monitor loses all past information 
about the user program. 


Since an interrupt is recognized by the hardware, 
the monitor cannot clear the display; thus the dis- 
play may remain unchanged after interrupt. 


IMPORTANT: Two conditions must be satisfied 
for the Vector Interrupt feature to be enabled: 


1. Interrupts must be enabled (by executing an 
El instruction). 


2. RST 7.5 must be unmasked (mask reset by 
the SIM instruction or by modifying the 
|-Register). 


Program Debugging — The Use of Breakpoints 


Along with the “cold start’’ reset caused when the 
button is pressed, the monitor also implements 
a “warm start’’ procedure. Execution of an RST 1 
instruction will cause the monitor to enter this 
“warm start’’ routine. The monitor will display the 
same message as a [nse (‘-80 85’), but all registers 
and user memory will be preserved in the state they 
were in at the time of execution of the RST 1. No 
system reset or initialization will be performed. 


By placing RST 1 instructions at key RAM loca- 
tions where you want to examine the CPU status, 
you can break from your program and then exam- 
ine and set memory locations and registers, or 
single-step a portion of your program. 
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To resume execution of the user program, press 
[»]. The PC value of the next instruction appears 
in the address field of the display. Then press [#*] 
to continue execution. 


Error Conditions — Illegal Key 


If a key is pressed which is illegal in its context 
(e.g., a command key is pressed when the monitor 
is expecting a number), the command is aborted 
and an error message is generated. This message 
takes the form “—Err’’, displayed in the address 
field. The monitor is then ready to accept a com- 
mand. The error message will be cleared when a 
command key is pressed. Therefore, you can cancel 
a command before you press or [ee] by pressing 
any illegal key instead. 


Memory Substitution Errors 


If the substitute memory command determines 
that the contents of a memory location were not 
changed correctly (i.e. location is in ROM or is 
nonexistent), the command is aborted and an error 
message is generated. This message also takes the 
form “—Err’’, displayed in the address field. The 
monitor is then ready to accept a new command. 
The error message will be cleared when a command 
key is pressed. 


TELETYPEWRITER OPERATION 
Console Commands 


This portion of the SDK-monitor communicates 
via a teletypewriter (console). Operation consists 
of dialogue between the operator and the monitor 
in the monitor’s command language. After you 
press the [«] button on the SDK 8085 _key, the 
monitor begins the dialogue by typing a sign-on 
message on the console (‘’ SDK "’) and then 
requests a command by typing a prompt character 
(‘.""). Commands are in the form of a single alpha- 
betic character specifying the command, followed 
by a list of numeric or alphabetic parameters. 
Numeric parameters are entered as hexadecimal 
numbers. The monitor recognizes the characters 0 
through 9 and A through F as legal hexadecimal 
digits. Longer numbers may be entered, but only 
the last four digits will be retained. 


The only command requiring an alphabetic param- 
eter is the ‘’X’’ command. The nature of such 
parameters will be discussed in the section explain- 
ing the command. 


Use of the Monitor for Programming and Checkout 


The monitor allows you to enter, check out, and 
execute small programs. It contains facilities for 
memory display and modification, 8085 CPU regis- 
ter display and modification, program loading from 
the console device, and program initiation with a 
breakpoint facility. In addition, the key on the 
keyboard may be used to initiate your own key- 
board interrupt routine. 


Command Structure 


In the following paragraphs, the monitor command 
language is discussed. Each command is described, 
and examples of its use are included for clarity. 
Error conditions that may be encountered while 
operating the monitor are described on page 14. 


The monitor requires each command to be termi- 
nated by a carriage return. With the exception of 
the “S” and ‘X"" commands, the command is not 
acted upon until the carriage return is sensed. 
Therefore, you may abort any command, before 
entering the carriage return, by typing any illegal 
character (such as RUBOUT). 


Except where indicated otherwise, a single space is 
synonymous with the comma for use as a delimiter. 
Consecutive spaces or commas, or a space or 
comma immediately following the command letter, 
are illegal in all commands except the ‘X’’ com- 
mand (see below). 


Items enclosed in parentheses ‘‘( )'’ are optional. 


D COMMAND EXAMPLE 


DY, 26 


0008 EF 20 €1 22 F2 20 F5 


0010 £1 22 
0020 D5 


ED 20 21 OO 00 
C3 3F O00 C3 57 O01 
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Display Memory Command, D: 
D <low address>, <high address> 


Selected areas of addressable memory may be 
accessed and displayed by the D command. The 
D command produces a formatted listing of the 
memory conienis between <low address> and 
<high address>, inclusive, on the console. Each 
line of the listing begins with the address of the 
first memory location displayed on that line, 
represented as 4 hexadecimal digits, followed by 
up to 16 memory locations, each one represented 
by 2 hexadecimal digits. 


Program Execute Command, G: 
G (<entry point>) 


Control of the CPU is transferred from the moni- 
tor to the user program by means of the program 
execute command G. The entry point should be an 
address in RAM which contains an instruction in 
the program. If no entry point is specified, the 
monitor uses, as an address, the value on top of 
the stack when the monitor was entered. 


G COMMAND EXAMPLE 


G2000 
Control is passed to location 2000. 


Insert Instructions into RAM, I: 


| <address> 
<data> 

Single instructions, or an entire user program, are 
entered into RAM with the | command. After 
sensing the carriage return terminating the com- 
mand line, the monitor waits for the user to enter a 
string of hexadecimal digits (0 to 9, A to F). Each 
digit in the string is converted into its binary value, 
and then loaded into memory, beginning at the 
starting address specified and continuing into se- 
quential memory locations. Two hexadecimal digits 
are loaded into each byte of memory. 


Separators between digits (spaces, commas, car- 
riage returns) are ignored; illegal characters, how- 
ever, will terminate the command with an error 
message (see page 4-13). The character ESC or ALT- 
MODE (which is echoed to the console as “$’’) 
terminates the digit string. 


| COMMAND EXAMPLE 1 


12010 
112233445566778899$ 


This command puts the following pattern into 
RAM: 


2010 11 22 33 44 55 66 77 88 99 


| COMMAND EXAMPLE 2 


12040 
123456789$ 


This command puts the following pattern into 
RAM: 


2040 12 34 56 78 90 


Note that since an odd number of hexadeci- 
mal digits was entered initially, a zero was 
appended to the digit string. 
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Move Memory Command, M: 
M <low address>, <high address>, <destination> 


The M command moves the contents of memory 
between <low address> and <high address> inclu- 
sive, to the area of RAM beginning at <destina- 
tion>. The contents of the source field remain 
undisturbed, unless the receiving field overlaps the 
source field. 


The move operation is performed on a byte-by-byte 
basis, beginning at <low address>. Care should be 
taken if <destination> is between <low address> 
and <high address>. For example, if location 2010 
contains 1A, the command M2010, 201F 2011 
will result in locations 2010 to 2020 containing 
“TAIAIA...”, and the original contents of mem- 
ory will be lost. 


The monitor will continue to move data until the 
source field is exhausted, or until it reaches address 
FFFF. If the monitor reaches FFFF without 
exhausting the source field, it will move data into 
this location, then stop. 


M COMMAND EXAMPLE 


M2010, 204F, 2050 


64 bytes of memory are moved from 2010- 
204F to 2050-208F by this command. 


Substitute Memory Command, S: 
S <address> (<data>) 


The S command allows you to examine and op- 
tionally modify memory locations individually. 
The command functions as follows: 


1. Type an S, followed by the hexadecimal ad- 
dress of the first memory location you wish to 
examine, followed by a space or comma. 


2. The contents of the location are displayed, 
followed by a dash (—). 


To modify the contents of the location dis- 
played, type in the new data, followed by a 
space, comma, or carriage return. If you do 
not wish to modify the location, type only 
the space, comma.The next higher memory 
location will automatically be displayed as 

as in step (2). 


Type a carriage return. The S command will 
be terminated. 


S COMMAND EXAMPLE 


$2050 AA- BB-CC 01-13 23-24 


Location 2050, which contains AA, is un- 
changed, but location 2051 (which used to 
contain BB) now contains CC, 2052 (which 
used to contain 01) now contains 13, and 
2053 (which used to contain 23) now con- 
tains 24. 


Examine/Modify CPU Registers Command, X: 
X (<register identifier>) 


Display and modification of the CPU registers is 
accomplished via the X command. The X command 
uses <register identifier> to select the particular 
register to be displayed. A register identifier is a 
single alphabetic character denoting a register, 
as defined in Table, 
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TABLE 
X COMMAND REGISTER IDENTIFIERS 


| IDENTIFIER | REGISTER | 
CODE 


Register A 
Register B 
Register C 
Register D 
Register E 


Flags byte 


Interrupt Mask 
Register H 
Register L 


Registers H and L com- 
bined 


Stack Pointer 


Program Counter 


The command operates as follows: 


1. Type an X, followed by a register identifier or 
a Carriage return. 


2. The contents of the register are displayed (two 
hexadecimal digits for A, B, C, D, E, F, |, H, 
and L, four hexadecimal digits for M, S, & P), 
followed by a dash (-—). 


3. The register may be modified at this time by 
typing the new value, followed by a space, 
comma, or carriage return. if no modification 
is desired, type only the space, comma, or 
carriage return. 


4. If a space or comma is typed in step (3), the 
next register in sequence will be displayed as 
in step 2 (unless P was just displayed which 
case the command is terminated). If a carriage 
return is entered in step 3, the X command is 
terminated. 


If a carriage return is typed in step (1) above, 
an annotated list of all registers and their con- 
tents is displayed. 


o 


Note: The bits in the flag byte (F) and inter- 
rupt mask (I) are encoded as follows: 


The format for the F register: 


| tL CARRY 
PARITY 
AUX CARRY 
ZERO 
SIGN 


xX = UNDEFINED 


The format for the | register: 
7 


0 
M 
75: 


—— 
| 1. INTERRUPT MASK 
INTERRUPT ENABLE FLAG 


For more information on the 8085’s inter- 
rupt masks, please consult the 8085 
User’s Manual. 


Note: 


Program Debugging — Breakpoint Facility 


The monitor treats the RST 1 instruction (CF) as 
a special sequence initiator. Upon execution of an 
RST 1 instruction the monitor will automatically 
save the complete CPU status and output the sign- 
on message (“" SDK "’) to the console. You may 

at that time display the contents of the CPU status 
register by initiating an “X’” command. After 
examining the machine status and making any 
necessary changes you can resume execution of 
the program by inputting “’“G”’ and Carriage Return 
on the console. You can step through large por- 
tions of your program by inserting RST 1 instruc- 
tions at key locations. 
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Error Conditions — Invalid Characters 


Each character is checked as it is entered from the 
console. As soon as the monitor determines that 
the last character entered is illegal in its context, it 
aborts the command and issues an ‘’*’’ to indicate 
the error. 


INVALID CHARACTER EXAMPLE 


D2000, 205G* 


The character G was encountered in a param- 
eter list where only hexadecimal digits and 
delimiters are valid. 


Address Value Errors 


Some commands require an address pair of the 
form <low address>, <high address>. If, on these 
commands, the value of <low address> is greater 
than or equal to the value of <high address>, the 
action indicated by the command will be per- 
formed on the data at low address only. Addresses 
are evaluated modulo 2!'6. Thus, if a hexadecimal 
address greater than FFFF is entered, only the last 
4 hex digits will be used. Another type of address 
error may occur when you specify a part of 
memory in a command which does not exist in the 
hardware configuration you are using. 


In general, if a nonexistent portion of memory is 
specified as the source field for an instruction, the 
data fetched will be unpredictable. If a nonexistent 
portion of memory is given as the destination field 
in a command, the command has no effect. 


OVERVIEW 


This portion of the 8085 User’s Manual should 
provide you with sufficient knowledge to write 
programs to exercise the basic system as well as 
providing capability to use the basic kit as a nu- 
cleus around which you can build larger systems. 


SYSTEM COMPONENTS 
The 8085 CPU & The System Buses 


The 8085 CPU is an evolutionary enhancement of 
Intel’s industry standard 8080A. It is 100% soft- 
ware compatible with the 8080A while offering the 
benefits of single power supply, higher integration, 
higher performance, and improved system timing. 


The 8085 multiplexes its 8 bits 

data bus with the low 8 bits of its address bus. 
The 8155 and 8355/8755 Memory I/O components 
in the kit are designed to be compatible with this 
bus structure, precluding the need for external bus 
latches. 


Four vectored interrupt inputs are available in 
addition to the standard 8080A-type interrupt. 
There is also a serial input and serial output data 
line pair that is exercised under program control to 
provide the SDK’s simple teletype |/O. 


The basic clock frequency of the 8085 in the kit is 


3.072 MHz (internally divided by 2 from the 6.144 
MHz crystal input). 
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THE HARDWARE 


The 8155 


The 8155 is a highly integrated chip designed for 
compatibility with the 8085’s bus structure. !t con- 
tains 256 bytes of static RAM memory, 22 pro- 
grammable 1/O lines, and a 14-bit timer/counter. 
The function of the 8155 is described in detail in 
the Intel 8085 CPU User’s Manual. 


One 8155 is included with the SDK. 

space for another has been provided on the circuit 
The RAM memory in the 8155 is for tempo- 

rary storage of information needed by system 
programs. 


The 8155's timer is used by the SDK-85 monitor's 
Single Step routine to interrupt the processor fol- 
lowing the execution of each instruction. 


MEMORY ADDRESS 


| I ey | 
OPEN 
OPEN 


EXPANSION RAM ROM 


EXPANSION RAM ROM 


BASIC RAM 
(256 LOC.) 


MONITOR ROM (2K) 


0000 


Memory Map 


Any of the areas marked ““OPEN” in Figure are 
free for expansion. You may mount extra memory 
chips in the area of the SDK8085 board chip pads 
or on other circuit boards. 


If you want to expand on the basic SDK you 
don’t have to stick to the multiplexed-bus 8085's 
memory/I/O family. Mounting pads are present on 
the circuit board. 
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INPUT/OUTPUT PORT 
AND PERIPHERAL 
DEVICE ADDRESSING 


As mentioned before, the 8155 that come with 
the SDK 8085have on-board input/output ports. 


Please consult the 8085 User’s Manual for the 

use of the various special purpose registers referred 
to in the table (Direction Registers, Command/ 
Status Registers, etc.), and for complete instruc- 
tions for exercising the memory-I/O chips (8155). 


Hardware Note: The timer/counter of the 
8155 (RAM) is dedicated as a timer. It is hardwired 
to receive the 8085’s system clock (3.072 MHz 
CLK) as its count input. This timer is used by the 
keyboard monitor’s SINGLE STEP function, so 
you should beware of timer conflicts if you desire 
to count and use the SINGLE STEP function at 
the same time. 


1/0 PORT MAP 


FUNCTION 


EXPANSION RAM 
COMMAND/STATUS Register 


EXPANSION RAM PORT A 
EXPANSION RAM PORT B 
EXPANSION RAM PORT C 


EXPANSION RAM Low Order Byte 
of Timer Count 


EXPANSION RAM High Order Byte 
of Timer Count 


PORT 


ACCESSING THE 
KEYBOARD DISPLAY CONTROLLER 


READ/ 
WRITE FUNCTION 


CALL 
LOCATION 


Read Keyboard 
FIFO 


Write Data to 


Display 


Read Status 
Word 


Write Command 
Word 
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a 

aa 
7 | f: 

== 
e 9 E 
am” @ 

d d.p. 

LSB DISPLAY 


MSB 
RAM OUTPUT 
PLT |*]=}— set 
d c b a d.p. g f e ~—————— SEGMENT 


Figure 5-3 Data Format 


The hardware is designed so that writing a zero into 
a bit position turns on the corresponding LED 
segment. 


a ‘’4” would be represented as 
1001 1001 = 99 (Hex) 


Example: 


These are six active LED displays available for use. 
They are configured in a four-place address field 
and a two-place data field as in Figure 5-4. 


ADDRESS FIELD DATA FIELD 
Display Configuration 


The display digits are stored within the display 
RAM in the locations listed in Table. 


TABLE 


DISPLAY RAM 
LOCATION PURPOSE 


Address digit 


Data Digit 


UNUSED 
UNUSED 


NO OP WHO 


PROCESSOR INTERRUPT 
ALLOCATION 


The 8085 has four Vector Interrupt input pins in 
addition to an 8080A-compatible interrupt input. 


The function of the on-chip interrupts is described 
in detail in the 8085 Manual. 


8085 ON-CHIP INTERRUPT ALLOCATION 


INPUT FUNCTION 


Dedicated to display 
Available User Interrupt 


button interrupt 
8155 Timer Interrupt 
Available User Interrupt 
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THE SERIAL DATA 
INTERFACE 


The SDKhas the capability of communicating 
with a teletype, using the 8085 serial input and 
serial output data lines (SID and SOD respectively) 
to send and receive the serial bit strings that encode 
data characters. 


To send data to the teletype, the 8085 must toggle 
the SOD line in a set/reset fashion controlled by 
software timing routines in the SDK-85 monitor. 


Input data is obtained by monitoring and timing 
changes in the level of the SID pin. Again, a moni- 
tor routine is called upon to do the job. 


These teletype communications routines are acces- 
sible to the user. 


Both subroutines communicate at a data rate of 
600 baud, the standard rate. 


Since the 8085 serial input and output lines are 
designed for communicating with other integrated 
circuits, additional electronic circuitry is needed 
before they can be connected to a terminal. 


System Design 


DISPLAY/KEYBARD & SERIAL CONNECTOR 


ora 


? 
2 
r 
2 
: 
r) 


BUS 
EXPANSIOM (2 )\\ 


a. 
== = 
¥ ee 


<a 


=" 


1/O EXPANSION 


INTERFACE CABLE 


— oth IRQ ™ “ 

wht gry vio blu INTERFACE 

1@ Orga @ @> | case 
PIN 

a - mm me | e@ 10 | Layout 


org yel gre blu 
5V FIRQ Reset RX GND 


SUBST EXAM RESET VECT 
MEM REG INTR 
ae 


EXEC SINGLE GO 
we . STEP 


SS oo oe 


Contitronix 8085 SOX 


123 @« & € 7 & 9 
@@e@eee @ee © 


SV Reset RST7.S RSTS.S RX 


DISPLAY & KEYBOARD 


Gnd Gnd TX 5V 
KEY MAPPING 


BOARD CONNECTOR DISPLAY & KEYBOARD 


Copyright 1979 Contitronix, Inc. 
3848 Marquis Dr. Garland, TX 75042 


Q 
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MONITOR LISTING 


I I I IR I I IR IR IO IO IO I I II I IO I 


; ABSTRACT 


PROGRAM: SDK8085 CONTITRONIX 
(ADAPTED TO THE CENTRONIX 8085 BOARD) 


MODIFIED FOR: 600BAUD 8N2 
8155 LOCATED AT 0800H WITH 256 BYTES RAM (4KB FREE RAM STARTING AT 2000) 


COMMUNICATION TO CONTITRONIX KEYBOARD 
[ODO IOI IO IOI IOI IO IO IOI IO IO III III III III IOI I I I ISR a a a a ak 


+ THIS PROGRAM IS A SMALL MONITOR FOR THE INTEL 8885 KIT AND 

7 PROVIDES A MINIMUM LEVEL OF UTILITY FUNCTIONS FOR THE USER EMPLOYING 
TER-ACTIVE CONSOLE (I.E. TELETYPE) 
DISPLAY. THE KEYBOARD MONITOR ALLOWS THE USER TO PERFORM 


; EITHER AN IN 
; KEYBOARD/LED 
7 SUCH FUNCTIO. 
7 PROGRAM EXEC 


; PROGRAM ORGAI 


; THE PROGRAM 


IZATION 


IS ORGANIZED AS FOLLOWS :- 


’ -1) COLD START ROUTINE (RESET) 
; 2) WARM START -REGISTER SAVE ROUTINE 
; 3) INTERRUPT VECTORS 


KEY. 
TTY 
LAY 


; THE KEYBOARD 
; WITHIN THEIR 
; THROUGHOUT T 
; WITH "ARG - 


; A REGISTER A 


; LIST OF KEYB 


; NAME 


BOARD MONITOR 
MONITOR 
OUT OF RAM USAG 


OR THE KIT'S 


S AS MEMORY AND REGISTER MANIPULATION, PROGRAM LOADING, 
UTION, INTERRUPTION OF AN EXECUTING PROGRAM, AND 
; SYSTEM RESET. 


MONITOR BEGINS WITH THE COMMAND RECOGNIZER, FOLLOWED BY 
; THE COMMAND ROUTINE SECTION, UTILITY ROUTINE SECTION AND MONITOR 
; TABLES. THE COMMAND AND UTILITY ROUTINES ARE IN ALPHABETICAL ORDER 


RESPECTIVE SECTIONS. 


HE KEYBOARD MONITOR, A COMMENT FIELD BEGINNING 
" INDICATES A STATEMENT WHICH LOADS A VALUE INTO 
S AN ARGUMENT FOR A FUNCTION. WHEN THE DESIRED VALUE 


OARD MONITOR ROUTINES 


SDK85 


I I RR RIKI IR IOI IO IO I I IR I I IO I 


SET CONDITIONAL ASSEMBLY FLAG 


I IRR IR ORR IRR IR IO II I I I IO I IO I 


21 


0000 


0800 


2000 


0017 


O0le 


ooof 


0000 
0090 


0011 
0000 
0008 
0094 


0001 
0001 
0008 
0080 
00cc 


0000 


08e9 


0000 
0010 
O00fb 
0040 


000d 
000c 
0040 
00c0 
000e 
0800 
08c7 


00c5 


0000 


0000 
0003 
0005 


31 c7 08 
3e 00 
cd fl 01 


WAITS 


SET 


70=NO WAIT STATES 

7;1-A WAIT STATE IS GENERATED FOR EVERY M CYCLE 
;THE APPROPRIATE DELAY TIME MUST BE USED FOR 
;TTY DELAY OR SET UP SINGLE 

7; STEP TIMER FOR EACH CASE 


I I IR IR I I I IRR IR IO II I I IR I I I 


MONITOR EQUATES 


I I IIR IR I IR IR IO IIR I I I IO I IO I 


7 
7 


RAMST 


EQU 


0800H 


; START ADDRESS OF RAM -THIS PROGRAM ASSUMES 


; THAT 256 BYTES OF RANDOM ACCESS MEMORY BEGIN AT THIS ADDRESS. 
; THE PROGRAM USES STORAGE AT THE END OF THIS SPACE FOR VARIABLES, 
; SAVING REGISTERS AND THE PROGRAM STACK 


7 


FRERAM 


RMUSE 


DOT 

DTFLD 
DTMSK 
EMPTY 
KBNIT 


KMODE 


MNSTK 


NODOT 
PERIO 
PRMPT 
READ 


TIMHI 
TIMLO 
TMODE 
TSTRT 
UNMSK 
USRBR 
USRSTK 


TIMER 


EQU 


EQU 


EQU 


EQU 


EQU 
EQU 


EQU 
EQU 
EQU 
EQU 


EQU 
EQU 
EQU 
EQU 
EQU 


EQU 


EQU 


EQU 
EQU 
EQU 
EQU 


EQU 
EQU 
EQU 
EQU 
EQU 
EQU 
EQU 


EQU 


2000H 


23 


30 


aS 


94H 


RAMST + 


; 4KB FREE RAM STARTING AT 2000H 


; RAM USAGE - CURRENTLY, 23 BYTES ARE USED FOR 
; /SAVING REGISTERS AND VARIABLES 


+ MONITOR STACK SPACE USAGE - MAX OF 15 LEVELS 


; 5 USER BRANCHES - 3 BYTES EACH 


: DICATES USE OF ADDRESS FIELD OF DISPLAY 
; CONTROL CHARACTER TO INDICATE OUTPUT TO 

; /ADDRESS FIELD OF DISPLAY 

; COMMA FROM KEYBOARD 
: ITIAL VALUE FOR COMMAND STATUS REGISTER 
; OUTPUT PORT FOR COMMAND STATUS REGISTER 

; CONTROL CHARACTER TO INDICATE OUTPUT TO 

; /DATA FIELD OF DISPLAY 
; DICATOR FOR DOT IN DISPLAY 

; DICATES USE OF DATA FIELD OF DISPLAY 

; MASK FOR TURNING ON DOT IN DISPLAY 

; HIGH ORDER 1 INDICATES EMPTY INPUT BUFFER 
; CONTROL CHARACTER TO SET DISPLAY OUTPUT TO 
; /ALL ONES DURING BLANKING PERIOD 

; CONTROL CHAR. TO SET KEYBOARD/DISPLAY MODE 
; (2 KEY ROLLOVER, 8 CHARACTER LEFT ENTRY) 
256 - RMUSE 
; START OF MONITOR STACK (FOR STEP MODE) 
; INDICATOR FOR NO DOT IN DISPLAY 

; PERIOD FROM KEYBOARD 
; PROMPT CHARACTER FOR DISPLAY (DASH) 

; CONTROL CHARACTER TO INDICATE INPUT FROM 

; /KEYBOARD 

; OUTPUT PORT FOR HIGH ORDER BYTE OF TIMER VALUE 

; OUTPUT PORT FOR LOW ORDER BYTE OF TIMER VALUE 

; TIMER MODE - SOUARE WAVE, AUTO RELOAD 

; START TIMER 

; UNMASK INPUT INTERRUPT 

; START OF USER IRQ BRANCH LOCATIONS 

256 -(RMUSE + SKLN + 4 ) ; USER STACK SPACE USAGE - MAX OF 92 LEVELS 

; START OF RESET USER STACK 

; TIMER VALUE FOR SINGLE STEP IF NO WAIT STATE INSERTED ELSE 237 

; WATCH STACK POINTER !! RAM 2000H USES ONE WAITSTATE, 0800H USES NO WAITSTATE 


I I IRR I I IIR IR OR IO IOI I IO IO I AO Ik 


KKK KK 


"RESET" 


ORG 


KEY ENTRY POINT - COLD START 


0 


xx*** RST Q ENTRY POINT 


LXI 
MVI 
CALL 


; STACK INITIALISATION 


SP,USRSTK ; INITIALIZE MONITOR STACK POINTER 


A, KMODE 
CLDST 


; GET CONTROL CHARACTER 
; GO FINISH COLD START 


*xx*** RST 1 ENTRY POINT -W ARM START 


0008 


0008 
000b 
000c 
OOOf 
0010 
0011 
0014 
0017 
0018 
001b 
00le 
OO1f 
0020 
0021 


0024 
0024 


0028 
0028 


002c 
002c 


0030 
0030 


0034 
0034 


0038 
0038 


003c 
003c 


003£ 
003£ 
0040 
0042 
0045 
0047 
0048 


0049 
004a 
004b 


004c 
004d 
O04£t 


0052 
0055 
0057 


a3 


c3 


a3 


c3 


c3 


c3 


C3 


20 
e6 
32 
3¢ 
30 
£3 


00 
00 
00 


af 
06 
van 


cd 
3e 
06 


ef 


£2 


ed 
00 


£4 
ed 


3f 


57 


00 


8e 


03 


06 


09 


Oc 


Of 
fl 
Oe 


00 
a6 


b7 
O1 
00 


08 


08 


08 
00 


08 
08 


00 


Ol 


08 


02 


08 


08 


08 


08 


08 


03 


02 


KKK KK 


KKK KK 


KKK KK 


KKK KK 


KKK KK 


KKK KK 


KKK KK 


RES10: 


7 


le) 
tu 


* 


HDOUOrP HAD HA YH 
> [e) 
io] ae) 


TIMER INTERRUPT 


ORG 
JMP 


RST 


ORG 
JMP 


8 
REGISTERS 

LSAV ? 
PSAV ; 
PSW 

FSAV ; 
H, 0 ; 
SP ; 
SSAV : 
H, BSAV+1 
B ; 
D ; 
RES10 7 


24H 
STP25 ; 


5 ENTRY POINT 


28H 
RSETS ; 


7 


SAVE H & L REGISTERS 
GET USER PROGRAM COUNTER FROM TOP OF STACK 
/AND SAVE IT 


SAVE FLIP/FLOPS & REGISTER A 
CLEAR H & L 

GET USER STACK POINTER 

/AND SAVE IT 

SET STACK POINTER FOR SAVING 
/REMAINING REGISTERS 

SAVE B & C 

SAVE D & E 

LEAVE ROOM FOR VECTORED INTERRUPTS 


(TRAP) ENTRY POINT (RST 4.5) 


BACK TO SINGLE STEP ROUTINE 


BRANCH TO RST 5 LOCATION IN RAM 


INPUT INTERRUPT ENTRY POINT (RST 5.5 


ORG 
JMP 


RST 


ORG 
JMP 


2CH 
ININT ; 


6 ENTRY POINT 


30H 
RSET6 ; 


BRANCH TO INPUT INTERRUPT ROUTINE 


BRANCH TO RST 6 LOCATION IN RAM 


HARD WIRED USER INTERRUPT ENTRY POINT (RST 6.5 


ORG 
JMP 


RST 


ORG 
JMP 


34H 
RST65 ; 


7 ENTRY POINT 


38H 
RSET7 ; 


BRANCH TO RST 6.5 LOCATION IN RAM 


BRANCH TO RST 7 LOCATION IN RAM 


"VECTORED INTERRUPT" KEY ENTRY POINT (RST 7.5) 


ORG 
JMP 


RIM 
ANI 
STA 
MVI 
SIM 
DI 


NOP 
NOP 
NOP 


3CH 

USINT ¢ 
OFH - 
ISAV 3 
A,UNMSK ; 


7 


BRANCH TO USER INTERRUPT LOCATION IN RAM 


CONTINUE SAVING USER STATUS 

GET USER INTERRUPT STATUS AND INTERRUPT MASK 
KEEP STATUS, MASK BITS 

SAVE INTERRUPT STATUS & MASK 

UNMASK INTERRUPTS FOR MONITOR USE 


INTERRUPTS DISABLED WHILE MONITOR IS RUNNING 
(EXCEPT WHEN WAITING FOR INPUT) 


I I IR IR RI I RI OR IR IO I I IO OI I Ik 


BEGINNING OF KEYBOARD MONITOR CODE 


I RR I IR IR I II I I I I AO I 


OUTPUT SIGN-ON MESSAGE 


XRA 
MVI 
LXI 


CALL 
MVI 
MVI 


A ; 
B,NODOT ; 
H,SGNAD ; 


OUTPT ; 
A,DTFLD ; 
B,NODOT ; 


ARG - USE ADDRESS FIELD OF DISPLAY 

ARG - NO DOT IN ADDRESS FIELD 

ARG - USE ADDRESS FIELD OF DISPLAY 
/SIGN-ON MESSAGE 

OUTPUT SIGN-ON MESSAGE TO ADDRESS FIELD 
ARG - USE DATA FIELD OF DISPLAY 

ARG - NO DOT IN DATA FIELD 


0059 


005c 
0o5f 
0061 


0064 
0064 
0067 


0068 
006a 
006d 
O06f 
0072 
0075 
0078 
007b 
007b 
007c 
OO7E 
0080 
0081 


0084 
0087 
0087 
008a 


008b 
008c 
008d 
008e 
008f 
0090 


0091 


0092 


0092 
0094 
0097 


009a 
009d 
009d 
00a0 
00a3 
00a4 
00a7 
00a9 
O0ac 
O0ae 
00b1 
00b4 


2 


cd 
3e 
32 


21 
£9 


3¢ 
cd 
36 
cd 
cd 
ol 
21 


be 
ca 
23 
0d 
c2 


e3 


21 
Od 


09 
09 
Te 
23 
66 
6f 


e9 


06 
cd 
cd 


d2 


cd 
cd 
Le 
32 
06 
cd 
06 
cd 
d2 
cd 


e9 


90 
8c 
fb 
99 
e7 
04 
78 


87 


Tb 


15 


7c 


o1 
a7 
44 


15 


09 
fc 


£8 
01 
6b 
Ol 
2b 
b8 
fc 


08 


07 
07 
02 


00 
03 


00 


00 


02 


03 


01 


03 


02 


03 
02 


08 


03 


02 


00 
02 


7 


7 


7 


LXI H,SGNDT ; ARG - GET ADDRESS OF DATA FIELD PORTION OF 
; /SIGN-ON MESSAGE 

CALL OUTPT ; OUTPUT SIGN-ON MESSAGE TO DATA FIELD 

MVI A, EMPTY ; NEW: LINE WAS MISSING 

STA IBUFF ; SET INPUT BUFFER EMPTY FLAG 


Oe ee ee ee ee ee ee ee ee ee 


FUNCTION: CMMND - COMMAND RECOGNIZER 
INPUTS: NONE 

OUTPUTS: NONE 

CALLS: RDKBD, ERR, SUBST, EXAM, GOCMD, SSTEP 
DESTROYS: A,B,C,D,E,H,L,F/F'S 


CMMND: 
LX H,MNSTK ; INITIALIZE MONITOR STACK POINTER 
SPHL 
; OUTPUT PROMPT CHARACTER TO DISPLAY 
MV A,ADISP ; OUTPUT CONTROL CHARACTER TO USE ADDRESS FIELD 
CALL COUT8279 
MV A,PRMPT ; OUTPUT PROMPT CHARACTER 
CALL DOUT8279 
CALL RDKBD ; READ KEYBOARD 
LX B,NUMC ; COUNTER FOR NUMBER OF COMMANDS IN C 
LX H,CMDTB ; GET ADDRESS OF COMMAND TABLE 
CMD10: 
CMP M ; RECOGNIZE THE COMMAND ? 
JZ CMD15 7 YES - GO PROCESS IT 
INX H 7 NO - NEXT COMMAND TABLE ENTRY 
DCR Cc ; END OF TABLE ? 
JNZ CMD10 7 NO - GO CHECK NEXT ENTRY 
7 YES -COMMAND UNKNOWN 
JMP ERR ; DISPLAY ERROR MESSAGE AND GET ANOTHER COMMAND 
CMD15: 
LXI H,CMDAD ; GET ADDRESS OF COMMAND ADDRESS TABLE 
DCR Cc 7 ADJUST COMMAND COUNTER 


7 


7 


;COUNTER ACTS AS POINTER TO COMMAND ADDRESS TABLE 


DAD B ; ADD POINTER TO TABLE ADDRESS TWICE BECAUSE 

DAD B ; TABLE HAS 2 BYTE ENTRIES 

MOV A,M ; GET LOW ORDER BYTE OF COMMAND ADDRESS 

INX H 

MOV H,M ; GET HIGH ORDER BYTE OF COMMAND ADDRESS IN H 

MOV L,A ; NEW: WRONG REGISTERS - PUT LOW ORDER BYTE IN L 
;COMMAND ROUTINE ADDRESS IS NOW IN H & L 

PCHL ; BRANCH TO ADDRESS IN H & L 


Oe ee ee ee ee ee ee ee ee ee 


COMMAND ROUTINES 


I I IR IR I IR I IRR IR IR IR IO I I IO OI IO Ik 


FUNCTION: EXAM - EXAMINE AND MODIFY REGISTERS 
INPUTS: NONE 

OUTPUTS: NONE 

CALLS: CLEAR, SETRG, ERR, RGNAM, RGLOC, UPDDT, GTHEX, NXTRG 
DESTROYS: A,B,C,D,E,H,L,F/F'S 


EXAM: 
MVI B, DOT ; ARG - DOT IN ADDRESS FIELD OF DISPLAY 
CALL CLEAR ; CLEAR DISPLAY 
CALL SETRG ; GET REGISTER DESIGNATOR FROM KEYBOARD AND 
; /SET REGISTER POINTER ACCORDINGLY 
; WAS CHARACTER A REGISTER DESIGNATOR? 
JNC ERR 
EXMO5: 
CALL RGNAM ; OUTPUT REGISTER NAME TO ADDRESS FIELD 
CALL RGLOC ; GET REGISTER SAVE LOCATION IN H & L 
MOV A,M ; GET REGISTER CONTENTS 
STA CURDT ; STORE REGISTER CONTENTS AT CURRENT DATA 
MV B, DOT ; ARG - DOT IN DATA FIELD 
CALL UPDDT ; UPDATE DATA FIELD OF DISPLAY 
MV B,DTFLD ; ARG - USE DATA FIELD OF DISPLAY 
CALL GTHEX ; GET HEX DIGITS - WERE ANY DIGITS RECEIVED? 
JNC EXM10 
CALL RGLOC ; YES - GET REGISTER SAVE LOCATION IN H & L 


00b7 
00b8 
00b8 
00ba 
00bda 
OObEt 
00c2 


00c5 
00c8 


00cb 
00cb 
00ce 
00d1 
00da3 


00d6 
00da9 
00db 
00de 
00e0 
00e3 
00e5 
00e8 
00e9 
00ec 
00ec 
O0ee 
OOf1 
00f2 
oof4 
OOf7 
OO0fa 


QS:-O 0:80 '-S: OOS 
BR 
x 


oom omomme) 
NO 
wo 


73 


fe 
ca 
fe 
c2 
cd 


da 
c3 


cd 
cd 
fe 
ca 


32 
06 
cd 
06 
cd 
fe 
c2 
eb 
22 


06 
cd 
af 
06 
21 
cd 
es 


cd 
cd 
fe 
ca 
fe 
ca 


32 
06 
cd 
06 
cd 
d2 
eb 
22 
fe 
ca 


3a 
e6 
32 
2a 


10 
e9 
11 
15 
a8 


9a 
e9 


00 
e7 
10 
ec 


fe 
O1 
a7 
00 
2b 
10 
15 


£2 


00 
d7 


00 
a2 
b7 
1b 


00 
e7 
10 
eg 
11 
26 


Le 
O1 
a7 
00 
2b 
15 


£2 
10 
e9 


f1 
08 
fd 
£2 


Ol 
02 


02 


00 
01 


02 
02 


00 


08 


ol 


02 


02 


08 


01 


02 
02 


Ol 


Ol 


08 


Ol 


02 
02 


08 


ol 


08 


08 
08 


MOV 


EXM10: 


7 


CPI 
JZ 
CPI 
JNZ 
CALL 


JC 
JMP 


EXMO5 
CLDIS 


7 


UPDATE REGISTER CONTENTS 


WAS LAST CHARACTER A PERIOD ? 
YES - CLEAR DISPLAY AND TERMINATE COMMAND 

WAS LAST CHARACTER ',' ? 

NO - DISPLAY ERROR MSG. AND TERMINATE COMMAND 
YES - ADVANCE REGISTER POINTER TO 

/NEXT REGISTER 

ANY MORE REGISTERS ? 


NO - CLEAR DISPLAY AND TERMINATE COMMAND 


I IR IR IRI I IRR IR OR I OR IOI I IO IO I AO Ik 


FUNCTION: GOCMD - EXECUTE USER PROGRAM 


INPUTS: NONE 
OUTPUTS: NONE 


BD, CLEAR, GTHEX, ERR, OUTPT 


DISPLAY USER PROGRAM COUNTER 
READ FROM KEYBOARD 

IS CHARACTER A PERIOD ? 

YES - GO EXECUTE THE COMMAND 
NO - ARG - CHARACTER IS STILL INA 
REPLACE CHARACTER IN INPUT BUFFER 
ARG - DOT IN ADDRESS FIELD 

CLEAR DISPLAY 
ARG - USE ADDRESS FIELD 
GET HEX DIGITS 
WAS LAST CHARACTER A PERIOD 

NO - DISPLAY ERROR MSG. AND TERMINATE COMMAND 
PUT HEX VALUE FROM GTHEX TO H & L 
HEX VALUE IS NEW USER PC 


YES - ARG - NO DOT IN ADDRESS FIELD 
CLEAR DISPLAY 
ARG - USE ADDRESS FIELD OF DISPLAY 
ARG - NO DOT IN ADDRESS FIELD 
GET ADDRESS OF EXECUTION MESSAGE IN H & L 
DISPLAY EXECUTION MESSAGE 


; CALLS: DISPC,RD 
; DESTROYS: A,B,C,D,E,H,L,F/F'S 
GOCMD: 
CALL DISPC 
CALL RDKBD 
CP. PERIO 
JZ G10 
STA IBUFF 
MV B, DOT 
CALL CLEAR 
MV B, ADFLD 
CALL GTHEX 
CP PERIO 
INZ ERR 
XCHG 
SHLD PSAV 
G10: 
MV B, NODOT 
CALL CLEAR 
XRA A 
MV B, NODOT 
LX H, EXMSG 
CALL OUTPT 
JMP RSTOR 


7 


7 


RESTORE USER REGISTERS INCL. PROGRAM COUNTER 
/1.E. BEGIN EXECUTION OF USER PROGRAM 


I I IR I OI IIR IR IR IR IO I IO I IO Ik 


7 


7 


SSTEP: 


FUNCTION: SSTEP - SINGLE STEP (EXECUTE ONE USER INSTRUCTION) 


INPUTS: NONE 
OUTPUTS: NONE 


CALLS: DISPC, RDKBD, CLEAR, GTHEX, ERR 
DESTROYS: A,B,C,D,E,H,L,F/F'S 


CALL 
CALL 
CP 
JZ 
CP 
JZ 


STA 
MV 
CALL 
MV 
CALL 
JNC 
XCHG 
SHLD 
CP 
JZ 


STP20: 


LDA 
ANI 
STA 
LHLD 


DISPC 
RDKBD 
PERIO 
CLDIS 
COMMA 
STP20 


IBUFF 
B, DOT 
CLEAR 
B, ADFLD 
GTHEX 
ERR 


PSAV 
PERIO 
CLDIS 


ISAV 
08H 

TEMP 
PSAV 


7 


7 


7 


7 


7 


7 


DISPLAY USER PROGRAM COUNTER 

READ FROM KEYBOARD 

WAS CHARACTER A PERIOD ? 

YES - CLEAR DISPLAY AND TERMINATE COMMAND 
WAS LAST CHARACTER ','? 

YES - GO SET TIMER 

NO - CHARACTER FROM KEYBOARD WAS NEITHER PERIOD NOR COMMA 
REPLACE THE CHARACTER IN THE INPUT BUFFER 
ARG - DOT IN ADDRESS FIELD 

CLEAR DISPLAY 

ARG - USE ADDRESS FIELD OF DISPLAY 

GET HEX DIGITS - WERE ANY DIGITS RECEIVED ? 


HEX VALUE FROM GTHEX TO H & L 

HEX VALUE IS NEW USER PC 

WAS LAST CHARACTER FROM GTHEX A PERIOD ? 
YES - CLEAR DISPLAY AND TERMINATE COMMAND 
NO - MUST HAVE BEEN A COMMA 


GET USER INTERRUPT MASK 
KEEP INTERRUPT STATUS 

SAVE USER INTERRUPT STATUS 
GET USER PC 


oom ome momo) oo oo Momo mom om omomomonme} 


oO 


SPT0C0COOOO OOOO OOOO OOOO OOOO OC OO oO 


oo ooo ooo momo mo momo mo mome) 


31 
32 
34 
37 
38 
3b 
3b 
3d 
40 
42 
42 
45 
45 


47 
49 
4b 
4d 
50 
52 
54 


57 


57 
58 
5b 
5d 
5f 
61 
62 
65 
66 
69 
6a 
6b 
6e 
71 
72 
75 
78 
719 
Ta 
Tb 
Tc 
Te 
81 
82 
85 
87 
88 


8b 
8b 
8d 
90 
92 
95 
98 
99 
9c 
9c 
9e 
al 
a3 
aé 
ad 
aa 
ad 


06 
cd 
06 
cd 
d2 
eb 
22 


fe 
c2 
06 
cd 
2a 
Te 
32 
06 


£3 
3b 


42 


fb 
45 
08 


fd 


40 


Od 
cS 
Oc 
££ 
c0 
08 
1b 


ff 
3£ 
40 
08 


ef 


£2 


ed 
00 


£4 
ed 


07 
fd 


fl 
Oe 


fd 


O1 
a7 
00 
2b 
15 


f6 


aa 
cf 
00 
of 
£6 


£8 
O1 


01 


01 


Ol 


08 


08 


03 


08 


08 


08 


08 


00 


08 
08 


08 


08 


00 


ol 


02 
02 


08 


ol 


03 
08 


08 


MOV 
CPI 
JNZ 
XRA 
JMP 


STP21: 


STP22: 


STP23: 


STP25: 


7 
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7 


7 


SUBST: 


SUBOS5: 


> 
oan 
tu H 


HLD 


le) 
ual 


OG 
un 
a0) 


* 


Eee OS oS 
i 
iw) E 
iw) 


A,M 
OF3H 
STP21 
A 
STP22 


OFBH 
STP23 
A,08H 


TEMP 


A, (TIMER SHR 8) OR TMODE ; HIGH ORDER BITS OF TIMER VALUE 


TIMHI 
A, TIMER 
TIMLO 
USCSR 
TSTRT 
CSR 
RSTOR 


SSAV 


07H 

H, TEMP 
M 

ISAV 

A, UNMSK 


SSTEP 


H, BSAV+1 


7 


7 


7 


AND OFFH ; LOW ORDER BITS OF TIMER VALUE 


7 


7 


GET USER INSTRUCTION 
DI INSTRUCTION ? 
NO 


YES - RESET USER INTERRUPT STATUS 


EI INSTRUCTION ? 
NO 


YES - SET USER INTERRUPT STATUS 


SAVE NEW USER INTERRUPT STATUS 


/OR'ED WITH TIMER MODE 


GET USER IMAGE OF WHAT'S IN CSR 
SET TIMER COMMAND BITS TO START TIMER 


START TIMER 


RESTORE USER REGISTERS 


BRANCH HERE WHEN TIMER INTERRUPTS AFTER 


/ONE USER INSTRUCTION 


SAVE PSW 


GET USER IMAGE OF WHAT'S IN CSR 


CLEAR 2 HIGH ORDER BITS 


SET TIMER STOP BIT 
STOP TIMER 
RETRIEVE PSW 

SAVE H, L 


GET USER PROGRAM COUNTER FROM TOP OF STACK 


SAVE USER PC 


SAVE FLIP/FLOPS AND A REGISTER 


CLEAR H & L 


GET USER STACK POINTER 
SAVE USER STACK POINTER 


; SET MONITOR STACK POINTER FOR 
/SAVING REMAINING USER REGISTERS 


SAVE B & C 
SAVE D & BE 


GET USER INTERRUPT MASK 


KEEP MASK BITS 


GET USER INTERRUPT STATUS 


OR IT INTO MASK 


SAVE INTERRUPT STATUS & MASK 
UNMASK INTERRUPTS FOR MONITOR USE 


GO GET READY FOR ANOTHER INSTRUCTION 


FUNCTION: SUBST - SUBSTITUTE MEMORY 


INPUTS: NO 
OUTPUTS: N 


NE 
ONE 


CALLS: CLEAR, GTHEX, UPDAD, UPDDT, ERR 
A,B,C,D,E,H,L,F/F'S 


DESTROYS: 


B, DOT 
CLEAR 
B, ADFLD 
GTHEX 
ERR 


CURAD 


COMMA 
SUB15 
B, NODOT 
UPDAD 
CURAD 
A,M 
CURDT 
B, DOT 


7 


7 


7 


7 


7 


7 


ARG - DOT IN ADDRESS 
CLEAR THE DISPLAY 


ARG - USE ADDRESS FIELD OF DISPLAY 
GET HEX DIGITS - WERE ANY DIGITS RECEIVED? 


ASSIGN HEX VALUE RETURNED BY GTHEX TO 


/ CURRENT ADDRESS 


WAS ',' THE LAST CHARACTER FROM KEYBOARD? 
NO - GO TERMINATE THE COMMAND 

ARG - NO DOT IN ADDRESS FIELD 

OF DISPLAY 

GET CURRENT ADDRESS IN H & L 

GET DATA BYTE POINTED TO BY CURRENT ADDRESS 
STORE DATA BYTE AT CURRENT DATA 


UPDATE ADDRESS FIELD 


FIELD 


ARG - DOT IN DATA FIELD 


26 


af 
b2 
b4 
b7 
b8 
bb 
be 


oom ome momo) 


bf 
c0 
cl 
c4 
c4 
oT? 
c8 
cb 
ce 
ef 
ef 
dl 
d4 


ooo om om ome mom ome momonme} 


01d7 
01d7 


fets) 
db 
dé 
e0 
e2 
e5 
e8 


ooo moomoo) 


Ole9d 
01e9 
Oleb 
Olee 


cd 
06 
cd 
£5 
d2 
2a 
73 


Tb 
be 
c2 


2a 
23 
22 
fl 
a3 


fe 
c2 
a3 


af 


21 
cd 
3e 
06 
21 
cd 
fone) 


06 


6b 
O1 
2b 


c4 
£6 


15 


f6 


f6 


9c 


10 
15 
e9 


9a 
b7 
01 
00 
9a 
b7 


00 


03 


02 


01 
08 


02 


08 


08 


01 


02 
01 


03 
02 


03 
02 


cd d7 01 
c3 64 00 


CALL UPDDT ; UPDATE DATA FIELD OF DISPLAY 
MVI B,DTFLD ; ARG - USE DATA FIELD 
CALL GTHEX ; GET HEX DIGITS -WERE ANY HEX DIGITS RECEIVED? 
PUSH PSW ; (SAVE LAST CHARACTER) 
JNC SUB10 
LHLD CURAD 7 YES - GET CURRENT ADDRESS IN H & L 
MOV 1B ; STORE NEW DATA AT CURRENT ADDRESS 
; MAKE SURE DATA WAS ACTUALLY STORED IN CASE 
;/CURRENT ADDRESS IS IN ROM OR IS NON-EXISTANT 
OV A,E ; DATA TO A FOR COMPARISON 
CMP ; WAS DATA STORED CORRECTLY? 
INZ ERR 7 NO - DISPLAY ERROR MSG. AND TERMINATE COMMAND 
SUB10: 
LHLD CURAD ; INCREMENT CURRENT ADDRESS 
NX H 
SHLD CURAD 
POP PSW ; RETRIEVE LAST CHARACTER 
JMP SUBOS5S 
SUBI15: 
CPI PERIO ; WAS LAST CHARACTER '.' ? 
INZ ERR 7 NO - DISPLAY ERROR MSG. AND TERMINATE COMMAND 
JMP CLDIS 7 YES - CLEAR DISPLAY AND TERMINATE COMMAND 
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; UTILITY ROUTINES 


I RR IRR IR I IR I I IIR I IR I A I A 


; FUNCTION: CLEAR - CLEAR THE DISPLAY 
; INPUTS: B - DOT FLAG - 1 MEANS PUT DOT IN ADDRESS FIELD OF DISPLAY 
; - 0 MEANS NO DOT 

; OUTPUTS: NONE 

; CALLS: OUTPT 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 

; DESCRIPTION: CLEAR SENDS BLANK CHARACTERS TO BOTH THE ADDRESS FIELD 


; AND THE DATA FIELD OF THE DISPLAY. IF THE DOT FLAG IS 
; SET THEN A DOT WILL APPEAR AT THE RIGHT EDGE OF THE 
; ADDRESS FIELD. 
CLEAR: 

XRA A ; ARG - USE ADDRESS FIELD OF DISPLAY 

7 ARG - FLAG FOR DOT IN ADDR. FIELD IS IN B 

LXI H,BLNKS ; ARG - ADDRESS OF BLANKS FOR DISPLAY 

CALL OUTPT ; OUTPUT BLANKS TO ADDRESS FIELD 

MVI A,DTFLD ; ARG - USE DATA FIELD OF DISPLAY 

MVI B,NODOT ; ARG - NO DOT IN DATA FIELD 

LXI H,BLNKS ; ARG - ADDRESS OF BLANKS FOR DISPLAY 

CALL OUTPT ; OUTPUT BLANKS TO DATA FIELD 

RET ; RETURN 


RR RR I IR IR IO IIR I I I IR I IR A I 


; FUNCTION: CLDIS - CLEAR DISPLAY AND TERMINATE COMMAND 
; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: CLEAR 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 

; DESCRIPTION: CLDIS IS JUMPED TO BY COMMAND ROUTINES WISHING TO 


; TERMINATE NORMALLY. CLDIS CLEARS THE DISPLAY AND 
; BRANCHES TO THE COMMAND RECOGNIZER. 
CLDIS: 

MVI B,NODOT ; ARG - NO DOT IN ADDRESS FIELD 

CALL CLEAR ; CLEAR THE DISPLAY 

JMP CMMND 7 GO GET ANOTHER COMMAND 


RI RI I IR IR IR IO I II I I I I I I A I A 


; FUNCTION: CLDST - COLD START 

; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: NOTHING 

; DESTROYS: A 

; DESCRIPTION: CLOST IS JUMPED TO BY THE MAIN COLD START PROCEDURE, 
; COMPLETES COLD START INITIALIZATION, A~ JUMPS BACK 

; TO THE MAIN COLD START PROCEDURE. 


01f1 
01f1 
01f4 
01f6 
01f£9 
Olfa 
Olfc 
O1ft 


0200 
0200 
0203 
0206 
0207 
020a 
020c 
O20£ 
0211 
0214 


0215 
0215 
0216 
0218 
021b 
O21le 
0220 
0222 
0225 
0228 


cd 
3e 
cd 
af 
a3 
32 
eg 


2a 
22 
Te 
32 
06 
cd 
06 
cd 
cQ 


af 
06 
21 
cd 
3¢@ 
06 
21 
cd 
e3 


8c 
cc 
8c 


08 
ff 


£2 
£6 


£8 
o1 
Sf 
00 
6b 


00 
9e 
b7 
O1 
00 
9a 
b7 
64 


07 


07 


08 


08 
08 


08 


03 


03 


03 
02 


03 
02 
00 


CLDST 
CALL COUT8279 
MVI A,KBNIT ; GET CONTROL CHARACTER 
CALL COUT8279 
XRA A 
OUT CSR ; INITIALIZE CSR 
STA USCSR ; INITIALIZE USER CSR VALUE 
RET 
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; FUNCTION: DISPC - DISPLAY PROGRAM COUNTER 
; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: UPDAD, UPDDT 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 

; DESCRIPTION: DISPC DISPLAYS THE USER PROGRAM COUNTER IN THE ADDRESS 


; FIELD OF THE DISPLAY, \'11TH A DOT AT THE RIGHT EDGE 
; OF THE FIELD. THE BYTE OF DATA ADDRESSED BY THE PROGRAM 
; COUNTER IS DISPLAYED IN THE DATA FIELD OF THE DISPLAY. 
DISPC: 

LHLD PSAV ; GET USER PROGRAM COUNTER 

SHLD CURAD ; MAKE IT THE CURRENT ADDRESS 

MOV A,M ; GET THE INSTRUCTION AT THAT ADDRESS 

STA CURDT ; MAKE IT THE CURRENT DATA 

MVI B, DOT ; ARG - DOT IN ADDRESS FIELD 

CALL UPDAD ; UPDATE ADDRESS FIELD OF DISPLAY 

MVI B,NODOT ; ARG - NO DOT IN DATA FIELD 

CALL UPDDT ; UPDATE DATA FIELD OF DISPLAY 

RET 
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; FUNCTION: ERR - DISPLAY ERROR MESSAGE 
; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: OUTPT 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 

; DESCRIPTION: ERR IS JUMPED TO BY COMMAND ROUTINES WISHING TO 


; TERMINATE BECAUSE OF AN ERROR. 
; ERR OUTPUTS AN ERROR MESSAGE TO THE DISPLAY AND 
; BRANCHES TO THE COMMAND RECOGNIZER. 
ERR: 
XRA A 7 ARG - USE ADDRESS FIELD 
MVI B,NODOT ; ARG - NO DOT IN ADDRESS FIELD 
LXI H,ERMSG ; ARG - ADDRESS OF ERROR MESSAGE 
CALL OUTPT ; OUTPUT ERROR MESSAGE TO ADDRESS FIELD 
MVI A,DTFLD ; ARG - USE DATA FIELD 
MVI B,NODOT ; ARG - NO DOT IN DATA FIELD 
LXI H,BLNKS ; ARG - ADDRESS OF BLANKS FOR DISPLAY 
CALL OUTPT ; OUTPUT BLANKS TO DATA FIELD 
JMP CMMND 7 GO GET A NEW COMMAND 
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I I IR IR I IR I IIR I OR I OR IO I II IO I IO Ik 


; FUNCTION: GTHEX - GET HEX DIGITS 
; INPUTS: B - DISPLAY FLAG - 0 MEANS USE ADDRESS FIELD OF DISPLAY 


; -1 MEANS USE DATA FIELD OF DISPLAY 

; OUTPUTS: A - LAST CHARACTER READ FROM KEYBOARD 

; DE - HEX DIGITS FROM KEYBOARD EVALUATED MODULO 2**16 
; CARRY - SET IF AT LEAST ONE VALID HEX DIGIT WAS READ 
; - RESET OTHERWISE 


; CALLS: RDKBD, INSDG, HXDSP, OUTPT 
; DESTROYS, A,B,C,D,E,H,L,F/F'S 


; DESCRIPTION: GTHEX ACCEPTS A STRING OF HEX DIGITS FROM THE KEYBOARD, 
; DISPLAYS THEM AS THEY ARE RECEIVED, AND RETURNS THEIR 

; VALUE AS A 16 BIT INTEGER. IF MORE THAN 4 HEX DIGITS 

; ARE RECEIVED, ONLY THE LAST 4 ARE USED. IF THE DISPLAY 
; FLAG IS SET, THE LAST 2 HEX DIGITS ARE DISPLAYED IN THE 
; DATA FIELD OF THE DISPLAY. OTHERWISE, THE LAST 4 HEX 

; DIGITS ARE DISPLAYED IN THE ADDRESS FIELD OF THE 

; DISPLAY. IN EITHER CASE, A DOT WILL BE DISPLAYED AT THE 
; RIGHTMOST EDGE OF THE FIELD. A CHARACTER WHICH IS NOT 

; A HEX DIGIT TERMINATES THE STRING AND IS RETURNED AS 


022b 
022b 
022d 
022e 
0231 
0232 
0232 
0235 
0237 


023a 
023b 
023e 
023f£ 


0241 
0242 
0243 
0244 
0245 


0248 
0249 


0249 


024c 
024d 
O24f 
0252 
0255 
0255 
0256 
0257 
0259 
025c 
025e 


0261 
0264 
0267 
0267 
0268 
0269 
026a 
026b 


026c 
026c 
026d 
026e 
026£ 
0270 
0271 
0273 


Oe 
(on3) 
11 
a5 


cd 
fe 
d2 


dl 
cd 
el 
Oe 


cS 
d5 
78 
Of 
d2 


53 


cd 


78 
06 
cd 
63 


dl 
el 
fe 
ca 
fe 
ca 


11 
e3 


47 
719 
Of 
78 
eo. 


Ta 
Of 
Of 
Of 
Of 
e6 


00 


00 


e7 


10 


25) 


Of 


o1 


49 


6c 


o1 
b7 
32. 


11 
67 
10 
67 


00 
£7 


Of 


00 


02 


02 


02 


02 


02 


02 
02 


02 


02 


00 
02 


21 £9 08 


GTHOS: 


GTH10: 


GTH20: 


GTH25: 


MV 
PUSH 
LX 
PUSH 


CALL 
CP 
JNC 


POP 
CALL 
POP 
MV 


PUSH 
PUSH 
MOV 
RRC 
INC 


MOV 


CALL 


MOV 
MVI 
CALL 
JMP 


POP 
POP 
CPI 
JZ 
CPI 
JZ 


LXI 
JMP 


MOV 
MOV 
RRC 
MOV 
RET 


AN OUTPUT OF THE FUNCTION. 


IF THE TERMINATOR IS NOT 


A PERIOD OR A COMMA THEN ANY HEX DIGITS WHICH MAY HAVE 


BEEN RECEIVED ARE CONSIDERED TO BE INVALID. 


THE 


FUNCTION RETURNS A FLAG INDICATING WHETHER OR NOT ANY 
VALID HEX DIGITS WERE RECEIVED. 


RESET HEX DIGIT FLAG 


SAVE DISPLAY AND HEX DIGIT FLAGS 


SET HEX VALUE TO ZERO 
SAVE HEX VALUE 


READ KEYBOARD 
IS CHARACTER A HEX DIGIT? 
NO - GO CHECK 
YES - ARG - NEW HEX DIGIT 
ARG - RETRIEVE HEX VALUE 
INSERT NEW DIG 
RETRIEVE DISPLAY FLAG 
SET HEX DIGIT FLAG 
/(1.E. A HEX D 
SAVE DISPLAY A 
SAVE HEX VALUE 
TEST DISPLAY FLAG 

SHOULD ADDRESS FIELD OF D 


YES -U SE HEX VALUE AS IS 
NO - ONLY LOW ORDER BYTE 
/BE USED FOR DATA FIELD O 


PUT LOW ORDER BYTE OF HEX 


FOR TERMINATOR 


IS INA 


T IN HEX VALUE 


GIT HAS BEEN READ) 
D HEX DIGIT FLAGS 


SPLAY BE USED ? 


OF HEX VALUE SHOULD 


F DISPLAY 
VALUE IN D 


ARG - HEX VALUE TO BE EXPANDED IS IND, E 


EXPAND HEX VALUE FOR DISP. 
ARG - ADDRESS OF EXPANDED 
ARG - PUT DISPLAY FLAG IN 
ARG - DOT IN APPROPRIATE 


LAY 

HEX VALUE INH, L 
A 

FIELD 


OUTPUT HEX VALUE TO DISPLAY 


GO GET NEXT CHARACTER 
LAST CHARACTER WAS NOT A 
RETRIEVE HEX VALUE 
RETRIEVE HEX DIGIT FLAG I 
WAS LAST CHARACTER ',' ? 
YES - READY TO RETURN 

NO - WAS 
YES - READY TO RETURN 

NO - INVALID TERMINATOR - 
SET HEX VALUE TO ZERO 
RETURN FALSE 


SAVE LAST CHARACTER 
SHIFT HEX DIGIT FLAG TO 
/CARRY BIT 

RESTORE LAST CHARACTER 
RETURN 


LAST CHARACTER '. 


HEX DIGIT 


"9 


IGNORE ANY HEX DIGITS READ 
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; FUNCTION: HXDSP - EXPAND HEX DIGITS FOR DISPLAY 


HL - ADDRESS OF OUTPUT BUFFER 


; INPUTS: DE - 4 HEX DIGITS 
; OUTPUTS: 
; CALLS: NOTHING 


; DESTROYS: A,H,L,F/F'S 
; DESCRIPTION: 


MOV 
RRC 
RRC 
RRC 
RRC 
ANI 
LXI 


HXDSP EXPANDS EACH INPUT BYTE TO 2 BYTES IN A FORM 
SUITABLE FOR DISPLAY BY THE OUTPUT ROUTINES. EACH INPUT 
BYTE IS DIVIDED INTO 2 HEX DIGITS. EACH HEX DIGIT IS 
PLACED IN THE LOW ORDER 4 BITS OF A BYTE WHOSE HIGH 


ORDER 4 BITS ARE SET TO ZERO. 


THE RESULTING BYTE IS 


STORED IN THE OUTPUT BUFFER. THE FUNCTION RETURNS THE 
ADDRESS OF THE OUTPUT BUFFER. 


OFH 
H, OBUFF 


7 


GET FIRST DATA BYTE 
CONVERT 4 HIGH ORDER BITS 
/TO A SINGLE CHARACTER 


GET ADDRESS OF OUTPUT BUFFER 


0276 
0277 
0278 
O27a 
027b 
O27c 
027d 
O27e 
O27£ 
0280 
0281 
0283 
0284 
0285 
0286 
0288 
0289 
028a 
028d 


028¢e 
028e 
O28f 
0291 
0294 
0297 
0299 
029c 
029d 
029e 


O29f 
O29f 
02a0 
O2al 
02a2 
02a3 
02a4 
02a5 
02a6 
02a7 


77 
Ta 
e6 
23 
77 
Tb 
Of 
Of 
Of 
Of 
e6 
23 
77 
Tb 
e6 
23 
77 
21 
cQ 


£5 
36 
cd 
cd 
e6 
32 
fl 
00 
cQ 


eb 
29 
29 
29 
29 
85 
6f 
eb 
cQ 


Of 


Of 


Of 


£9 


40 
8c 
ad 
3f 
fe 


08 


07 
07 


08 


MOV M,A ; STORE CHARACTER IN OUTPUT BUFFER 

MOV A,D ; GET FIRST DATA BYTE AND CONVERT 4 LOW ORDER 
ANI OFH ; /BITS TO A SINGLE CHARACTER 

INX H ; NEXT BUFFER POSITION 

MOV M,A ; STORE CHARACTER IN BUFFER 

MOV A,E ; GET SECOND DATA BYTE 

RRC ; CONVERT 4 HIGH ORDER BITS 

RRC ; /TO A SINGLE CHARACTER 

RRC 

RRC 

ANI OFH 

INX H ; NEXT BUFFER POSITION 

MOV M,A ; STORE CHARACTER IN BUFFER 

MOV A,E ; GET SECOND DATA BYTE AND CONVERT LOW ORDER 
ANI OFH ; /4 BITS TO A SINGLE CHARACTER 

INX H ; NEXT BUFFER POSITION 

MOV M,A ; STORE CHARACTER IN BUFFER 

LXI H,OBUFF ; RETURN ADDRESS OF OUTPUT BUFFER INH, L 
RET 
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; FUNCTION: ININT - INPUT INTERRUPT PROCESSING 
; INPUTS: NONE 
; OUTPUTS: NONE 
; CALLS: NOTHING 
; DESTROYS: NOTHING 

; DESCRIPTION: ININT IS ENTERED BY MEANS OF AN INTERRUPT VECTOR (IV2C) 


; THEN THE READ KEYBOARD ROUTINE IS WAITING FOR A 
; CHARACTER AND THE USER HAS PRESSED A KEY ON THE 
; EYBOARD (EXCEPT "RESET" OR -VECTORED INTERRUPT") . 
; ININT STORES THE INPUT CHARACTER IN THE INPUT BUFFER AND 
; RETURNS CONTROL TO THE READ KEYBOARD ROUTINE. 
ININT: 

PUSH PSW ; SAVE F/F'S , REGISTER A 

MVI A, READ 

CALL COUT8279 

CALL DIN8279 

ANI 3FH ; ZERO 2 HIGH ORDER BITS 

STA IBUFF ; STORE CHARACTER IN INPUT BUFFER 

POP PSW ; RESTORE F/F'S, REGISTER A 

NOP 

RET 
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; FUNCTION: INSDG - INSERT HEX DIGIT 

; INPUTS: A - HEX DIGIT TO BE INSERTED 

; DE - HEX VALUE 

; OUTPUTS: DE - HEX VALUE WITH DIGIT INSERTED 

7 CALLS: NOTHING 

; DESTROYS: A,F/F'S 

; DESCRIPTION: INSDG SHIFTS THE CONTENTS OF D, E LEFT 4 BITS 


; (1 HEX DIGIT) AND INSERTS THE HEX DIGIT IN A IN THE LO11 
; ORDER DIGIT POSITION OF THE RESULT. A IS ASSUMED TO 
: CONTAIN A SINGLE HEX DIGIT IN THE LO11 ORDER 4 BITS AND 
; ZEROS IN THE HIGH ORDER 4 BITS. 
INSDG: 

XCHG ; PUTD& EINH&L 

DAD H ; SHIFT H , L LEFT 4 BITS 

DAD H 

DAD H 

DAD H 

ADD L ; INSERT LOW ORDER DIGIT 

MOV L,A 

XCHG ; PUTH, L BACK IND&E 

RET 
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; FUNCTION: NXTRG - ADVANCE REGISTER POINTER TO NEXT REGISTER 
; INPUTS: NONE 

; OUTPUTS: CARRY - 1 IF POINTER IS ADVANCED SUCCESSFULLY 

; - 0 OTHERWISE 

7 CALLS: NOTHING 


02a8 
02a8 
O2ab 
O2ad 
02b0 
02b1 
02b4 


3a 
fe 
d2 
3c 
32 
c3 


Of 
da 
Oe 
3e 


e3 


Oe 
3¢e 


cd 


Te 
eb 
21 
85 
6f 
Te 
61 
25 
c2 
05 
c2 
£6 


Qf 
cd 
eb 
23 
0d 
c2 
cQ 


fd 
Oc 
£7 


fd 
fa 


c2 
04 
90 
c6 
02 
94 


8c 


84 


dc 


dc 
08 


99 


c9 


08 


02 


08 
02 


02 


02 


07 


03 


02 


02 


07 


02 


7 


7 


7 


DESTROYS: A,F/F'S 


DESCRIPTION: 


IF THE REGISTER POINTER POINTS TO THE LAST REGISTER IN 
THE EXAMINE REGISTER SEQUENCE, THE POINTER IS NOT 
CHANGED AND THE FUNCTION RETURNS FALSE. IF THE REGISTER 
POINTER DOES NOT POINT TO THE LAST REGISTER THEN THE 
POINTER IS ADVANCED TO THE NEXT REGISTER IN THE SEQUENCE 
AND THE FUNCTION RETURNS TRUE. 


RGPTR ; GET REGISTER POINTER 
UMRG-1 ; DOES POINTER POINT TO LAST REGISTER? 


RETF 7 YES - UNABLE TO ADVANCE POINTER - RETURN FALSE 
A 7 NO - ADVANCE REGISTER POINTER 

RGPTR ; SAVE REGISTER POINTER 

RETT ; RETURN TRUE 
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OUTOS: 


OUT10: 


OUT15: 


OUT20: 
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FUNCTION: OUTPT - OUTPUT CHARACTERS TO DISPLAY 
INPUTS: A - DISPLAY FLAG - 0 = USE ADDRESS FIELD 


1 = USE DATA FIELD 


B - DOT FLAG - 1 = OUTPUT DOT AT RIGHT EDGE OF FIELD 


0 = NO DOT 


HL - ADDRESS OF CHARACTERS TO BE OUTPUT 
CALLS: NOTHING 
DESTROYS: A,B,C,D,E,H,L,F/F'S 


DESCRIPTION: 


RRC 


RET 


OUTPT SENDS CHARACTERS TO THE DISPLAY. THE ADDRESS 

OF THE CHARACTERS IS RECEIVED AS AN ARGUMENT. EITHER 

2 CHARACTERS ARE SENT TO THE DATA FIELD, OR 4 CHARACTERS 
ARE SENT TO THE ADDRESS FIELD, DEPENDING ON THE 

DISPLAY FLAG ARGUMENT. THE DOT FLAG ARGUMENT DETERMINES 
WHETHER OR NOT A DOT (DECIMAL POINT) WILL BE SENT 

ALONG WITH THE LAST OUTPUT CHARACTER. 


; USE DATA FIELD ? 

OuUTOS5 7 YES - GO SET UP TO USE DATA FIELD 

C,4 7 NO -COUNT FOR ADDRESS FIELD 

A,ADISP ; CONTROL CHARACTER FOR OUTPUT TO ADDRESS 
; /FIELD OF DISPLAY 

OUT10 


2) ; COUNT FOR DATA FIELD 
A,DDISP ; CONTROL CHARACTER FOR OUTPUT TO DATA FIELD 
; /OF DISPLAY 


COUT8279 
A,M ; GET OUTPUT CHARACTER 


; SAVE OUTPUT CHARACTER ADDRESS IN D & E 
H,DSPTB ; GET DISPLAY FORMAT TABLE ADDRESS 


L ; USE OUTPUT CHARACTER AS A POINTER TO 
L,A ; /DISPLAY FORMAT TABLE 

A,M ; GET DISPLAY FORMAT CHARACTER FROM TABLE 
H,C ; TEST COUNTER WITHOUT CHANGING IT 

H ; IS THIS THE LAST CHARACTER ? 

OUT20 7 NO - GO OUTPUT CHARACTER AS IS 

B 7 YES - IS DOT FLAG SET ? 


OUT20 7 NO - GO OUTPUT CHARACTER AS IS 
DTMSK 7 YES - OR IN MASK TO DISPLAY DOT WITH 
; /LAST CHARACTER 


; COMPLEMENT OUTPUT CHARACTER 


DOUT8279 

; RETRIEVE OUTPUT CHARACTER ADDRESS 
H + NEXT OUTPUT CHARACTER 
e 7 ANY MORE OUTPUT CHARACTERS ? 


OUT15 7 YES - GO PROCESS ANOTHER CHARACTER 
7 NO - RETURN 


I IIR IR I RI IIR IR IRR IR IO I I IO IO I AO Ik 


FUNCTION: RDKBD - READ KEYBOARD 


INPUTS: NONE 


OUTPUTS: A - CHARACTER READ FROM KEYBOARD 
CALLS: NOTHING 
DESTROYS: A,H,L,F/F'S 


02e7 
02e7 
O2ea 


02eb 
O2ec 
O2ef 
02f0 
02f3 
02f3 
02f5 
O2f6 


02f£7 
02f7 
02f8 
02£9 


O2fa 
O2fa 
02fb 


02fc 
O2fc 
O2fft 
0301 
0304 
0305 
0306 


0308 


21 fe 08 
Te 


b7 
£2 £3 02 
fb 
c3 e7 02 


36 80 
£3: 
cQ 


37 
3f 
fone} 


37 
cQ 


2a fd 08 
26 00 

01 ed 03 
09 

6e 

26 08 


cQ 


; DESCRIPTION: RDKBD DETERMINES WHETHER OR NOT THERE IS A CHARACTER IN 


’ THE INPUT BUFFER. IF NOT, THE FUNCTION ENABLES 
; INTERRUPTS AND LOOPS UNTIL THE INPUT INTERRUPT 
; ROUTINE STORES A CHARACTER IN THE BUFFER. WHEN 
; THE BUFFER CONTAINS A CHARACTER, THE FUNCTION FLAGS 
; THE BUFFER AS EMPTY AND RETURNS THE CHARACTER 
; AS OUTPUT. 
RDKBD: 
LXI H, IBUFF ; GET INPUT BUFFER ADDRESS 
MOV A,M ; GET BUFFER CONTENTS 
; HIGH ORDER BIT = 1 MEANS BUFFER IS EMPTY 
ORA A 7 IS A CHARACTER AVAILABLE ? 
JP RDK10 7 YES - EXIT FROM LOOP 
EI 7 NO - READY FOR CHARACTER FROM KEYBOARD 
JMP RDKBD 
RDK10: 
MVI M,EMPTY ; SET BUFFER EMPTY FLAG 
DI ; RETURN WITH INTERRUPTS DISABLED 
RET 
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; FUNCTION: RETF - RETURN FALSE 

; INPUTS: NONE 

; OUTPUTS: CARRY - 0 (FALSE) 

7 CALLS: NOTHING 

; DESTROYS: CARRY 

; DESCRIPTION: RETF IS JUMPED TO BY FUNCTIONS WISHING TO RETURN FALSE. 


; RETF RESETS CARRY TO 0 AND RETURNS TO THE CALLER OF 
; THE ROUTINE INVOKING RETF. 
RETF: 

STC ; SET CARRY TRUE 

CMC ; COMPLEMENT CARRY TO MAKE IT FALSE 

RET 


7 
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; FUNCTION: RETT - RETURN TRUE 

; INPUTS: NONE 

+ OUTPUTS: CARRY = 1 (TRUE) 

; CALLS: NOTHING 

; DESTROYS: CARRY 

; DESCRIPTION: RETT IS JUMPED TO BY ROUTINES WISHING TO RETURN TRUE. 


; RETT SETS CARRY TO 1 AND RETURNS TO THE CALLER OF 
; THE ROUTINE INVOKING RETT. 
RETT: 

STC ; SET CARRY TRUE 

RET 


7 
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; FUNCTION: RGLOC - GET REGISTER SAVE LOCATION 
; INPUTS: NONE 

; OUTPUTS: HL - REGISTER SAVE LOCATION 

; CALLS: NOTHING 


; DESTROYS: B,C,H,L,F/EF'S 
; DESCRIPTION: RGLOC RETURNS THE SAVE LOCATION OF THE REGISTER 
; INDICATED BY THE CURRENT REGISTER POINTER VALUE. 
RGLOC: 
LHLD RGPTR ; GET REGISTER POINTER 
MV H,0 ; /INH&L 
LX B,RGTBL ; GET REGISTER SAVE LOCATION TABLE ADDRESS 
DAD B ; POINTER INDEXES TABLE 
MOV L,M ; GET LOW ORDER BYTE OF REGISTER SAVE LOC. 
MV H, (RAMST SHR 8) ; GET HIGH ORDER BYTE OF 


; /REGISTER SAVE LOCATION 
RET 
[OIC IC ICICI ISISICE I ISICICE I GIICICE ICIS ICE I IIIS ICE EI ICI ICE RII I ICE RII x ke a 
; FUNCTION: RGNAM - DISPLAY REGISTER NAME 
; INPUTS: NONE 
; OUTPUTS: NONE 


0309 
0309 
030c 
030e 
030£ 
0310 
0313 


0314 
0315 
0317 
O31a 


031b 
031b 
O031e 


0320 


0321 
0324 
0326 
0329 
032a 
032d 
032d 
032e 


0331 
0331 
0334 
0335 
0336 
0337 
0338 
033b 
033c 
033f 
0340 
0343 


2a 
26 
29 
29 
O11 
09 


af 
06 
cd 
cQ 


3a 
£6 


30 


3a 
e6 
ca 
fb 
c3 


3) 
d2 


21 
£9 
dl 
el 
fl 
2a 
£9 
2a 
5. 
2a 
cQ 


fd 
00 


b9 


00 
b7 


f1 
18 


fT, 
08 
2d 


31 


31 


e9 


£4 


£2 


ef 


08 


03 


02 


08 


08 


03 


03 


03 


08 


08 


08 


08 


7; CALLS: 


OUTPT 


; DESTROYS: A,B,C,D,E,H,L,F/F'S 


; DESCRIPTION: RGNAM DISPLAYS, 


RGNAM: 
LHLD 
MV 
DAD 
DAD 
LX 
DAD 


XRA 
MV 
CALL 
RET 


7 


IN THE ADDRESS FIE 


LD OF THE DISPLAY, 


THE REGISTER NAME CORRESPONDING TO THE CURRENT 
REGISTER POINTER VALUE. 


B, NMTBL 
B 


A 
B, NODOT 
OUTPT 


7 


7 


GET REGISTER POINTER 


MULTIPLY POINTER VALUE BY 4 
/ (REGISTER NAME TABLE HAS 4 BYTE ENTRIES) 


GET ADDRESS OF START OF 
ARG - ADD TABLE ADDRESS 
/ADDRESS OF APPROPRIATE 
ARG - USE ADDRESS FIELD 
ARG - NO DOT IN ADDRESS 
OUTPUT REGISTER NAME TO 


REGISTER NAME TABLE 

TO POINTER - RESULT IS 
REGISTER NAME IN H & L 
OF DISPLAY 

FIELD 

ADDRESS FIELD 


I I IRR IR I IRI I IR OR IIR IOI I IO OI IO Ik 


; FUNCTION: RSTOR - RESTOR USER REGISTERS 


; INPUTS: NONE 
NONE 
NOTHING 


; OUTPUTS: 
7; CALLS: 


; DESTROYS: A,B,C,D,E,H,L,F/F'S 
RSTOR RESTORES ALL CPU REGISTERS, 


; DESCRIPTION: 


INTERRUPT STATUS, 
AND PROGRAM COUNTER FROM THEIR RESPECTIVE 
SAVE LOCATIONS I 
COUNTER, THE ROUTINE EFFECTIVELY TRANSFERS CONTROL 
THE ADDRESS IN THE PROGRAM COUNTER 


INTERRUPT MASK, 


MEMORY. BY RESTO 


FLIP/FLOPS, 
STACK POINTER 


RING THE PROGRAM 
"ro 


SAVE LOCATION. 


THE TIMING OF THIS ROUTINE IS CRITICAL TO THE 


CORRECT OPERATIO 


OF THE SINGLE ST 


EP ROUTINE. 


IF ANY MODIFICATION CHANGES THE NUMBER OF CPU 
STATES NEEDED TO EXECUTE THIS ROUTINE THEN THE 
TIMER VALUE MUST BE ADJUSTED BY THE SAME NUMBER. 


*xx*x** THIS IS ALSO THE ENTRY POINT FOR THE TTY MONITOR 


STATUS 


ISABLED 
FOR USER PROGRAM 


EN SINGLE STEP ROUTINE 


THE TIMER IS RUNNING AND 


ROUTINE MUST NOT 


SET MONITOR STACK POINTER TO START OF STACK 


EGISTER SAVE AREA 


TER 


; TO RESTORE REGISTERS. 
RSTOR: 
LDA ISAV ; GET USER INTERRUPT MASK 
ORI 18H ; ENABLE SETTING OF INTERRUPT MASK AND 
; /RESET RST7.5 FLIP FLOP 
SIM ; RESTORE USER INTERRUPT MASK 
; RESTORE USER INTERRUPT 
LDA ISAV ; GET USER INTERRUPT MASK 
ANI 08H ; SHOULD USER INTERRUPTS BE ENABLED ? 
JZ RSRO5 ; NO - LEAVE INTERRUPTS D 
EI ; YES - ENABLE INTERRUPTS 
JMP RSR10 
RSRO5: 
STC ; DUMMY INSTRUCTIONS - WH 
INC RSR10 ; /1S BEING USED, 
; /EXECUTE TIME FOR THIS 
; /VARY. 
RSR10: 
LXI H,MNSTK ; 
SPHL ; /WHICH IS ALSO END OF R 
POP D ; RESTORE REGISTERS 
POP B 
POP PSW 
LHLD SSAV ; RESTORE USER STACK POIN 
SPHL 
LHLD PSAV 
PUSH H ; PUT USER PROGRAM COUNTER ON STACK 
LHLD LSAV ; RESTORE H & L REGISTERS 
RET ; JUMP TO USER PROGRAM CO 


7 


UNTER 


I I I IR IR I IRR IR ROR IR IO I I IO OI IO Ik 


; FUNCTION: SETRG - SET REGISTER POINTER 


; INPUTS: NONE 
CARRY - SET IF CHARACTER FROM KEYBOARD IS A REGISTER DESIGNATOR 


; OUTPUTS: 


RESET OTHERWISE 


7 CALLS: RDKBD 
; DESTROYS: A,B,C,H,L,F/F'S 
; DESCRIPTION: SETRG READS A CHARACTER FROM THE KEYBOARD. IF THE 


; CHARACTER IS A REGISTER DESIGNATOR, IT IS CONVERTED TO 
; THE CORRESPONDING REGISTER POINTER VALUE, THE POINTER IS 
; SAVED, AND THE FUNCTION RETURNS 'TRUE'. OTHERWISE, THE 
; FUNCTION RETURNS 'FALSE'. 
0344 SETRG: 
0344 cd e7 02 CALL RDKBD ; READ FROM KEYBOARD 
0347 fe 10 CPI 10H 7 IS CHARACTER A DIGIT? 
0349 d2 £7 02 JNC RETF 7 NO - RETURN FALSE - CHARACTER IS NOT A 
; /REGISTER DESIGNATOR 
034c dé 03 sur 3 7 YES - TRY TO CONVERT REGISTER DESIGNATOR TO 


; / INDEX INTO REGISTER POINTER TABLE 
; WAS CONVERSION SUCCESSFUL? 


034e da £7 02 JC RETF 7 NO - RETURN FALSE 

0351 4f£ MOV C,A ; INDEX TOB &C 

0352 06 00 MVI B,0 

0354 21 ac 03 LXI H,RGPTB ; GET ADDRESS OF REGISTER POINTER TABLE 
0357 09 DAD B ; INDEX POINTS INTO TABLE 

0358 1e MOV A,M ; GET REGISTER POINTER FROM TABLE 

0359 32 fd 08 STA RGPTR ; SAVE REGISTER POINTER 

035c c3 fa 02 JMP RETT ; RETURN TRUE 


I I IR OI IIR IR IIR IO I I IO IO I AO Ik 


; FUNCTION: UPDAD - UPDATE ADDRESS FIELD OF DISPLAY 
; INPUTS: B - DOT FLAG - 1 MEANS PUT DOT AT RIGHT EDGE OF FIELD 
: 0 MEANS NO DOT 

; OUTPUTS: NONE 

; CALLS: HXDSP, OUTPT 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 


; DESCRIPTION: UPDAD UPDATES THE ADDRESS FIELD OF THE DISPLAY USING 
é THE CURRENT ADDRESS. 
O35f UPDAD: 
O35f£ 2a £6 08 LHLD CURAD ; GET CURRENT ADDRESS 
0362 eb XCHG ; ARG - PUT CURRENT ADDRESS IN D & E 
0363 cd 6c 02 CALL HXDSP ; EXPAND CURRENT ADDRESS FOR DISPLAY 
; ARG - ADDRESS OF EXPANDED ADDRESS IS IN H & L 
0366 af XRA A ; ARG - USE ADDRESS FIELD OF DISPLAY 
; ARG - DOT FLAG IS IN B 
0367 cd b7 02 CALL OUTPT ; OUTPUT CURRENT ADDRESS TO ADDRESS FIELD 
036a c9 RET 
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; FUNCTION: UPDDT - UPDATE DATA FIELD OF DISPLAY 
; INPUTS: B - DOT FLAG - 1 MEANS PUT DOT AT RIGHT EDGE OF FIELD 
‘ 0 MEANS NO DOT 

; OUTPUTS: NONE 

; CALLS: HXDSP,OUTDT 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 

; DESCRIPTION: UPDDT UPDATES THE DATA FIELD OF THE DISPLAY USING 


i THE CURRENT DATA BYTE. 
036b UPDDT: 
036b 3a £8 08 LDA CURDT ; GET CURRENT DATA 
036e 57 MOV D,A ; ARG - PUT CURRENT DATA IN D 
036£ cd 6c 02 CALL HXDSP ; EXPAND CURRENT DATA FOR DISPLAY 
; ARG - ADDRESS OF EXPANDED DATA IS INH, L 
0372 3e Ol MVI A,DTFLD ; ARG - USE DATA FIELD OF DISPLAY 
; ARG - DOT PLAG IS IN B 
0374 cd b7 02 CALL OUTPT ; OUTPUT CURRENT DATA TO DATA FIELD 
0377 9 RET 
PRR KK KKK RRR KKK KK RK KK RK KK RK RK RK RR RK RR KK RR KK RR KK KK KK KK KK KKK KKK KKK KKK EK 
i MONITOR TABLES 


[DOIG ICC ICICI IISIC I IICICE I CIICICE IIIS ICE IIIS ICE I ICICI ICE I ICICI ICE A ICI 8 ka a 
7 COMMAND TABLE 
; COMMAND CHARACTERS AS RECEIVED FROM KEYBOARD 

0378 CMDTB: 

0378 12 DB 12H 7 GO COMMAND 


0379 
037a 
037b 
0004 


037c¢ 
037c 
037e 
0380 
0382 


0384 


039a 
039e 
03a2 


03a6 
O3aa 


O3ac 


13 
14 
15 


fd 
92 
8b 
cb 


£3 
60 
bs 
£4 
66 


dé 
a7 
70 


Tel 
76 


de? 


et] 


93 


e5 


97 


ake) 


67 


83 


37 


60 


05 


00 


15 
15 
Oe 


15 
08 


00 
00 
o1 
00 


15 
Oe 
15 


15 
05 


LS 
14 
a9 


08 


L5 
14 
TS. 


00 


DB 13H ; SUBSTITUTE MEMORY COMMAND 
DB 14H ; EXAMINE REGISTERS COMMAND 
DB 15H ; SINGLE STEP COMMAND 

NUMC EQU $-CMDTB ; NUMBER OF COMMANDS 


JODO III IO IOI III IOI IOI III III IO I II IOI IOI ER RGR A a A a kk 
7 COMMAND ROUTINE ADDRESS TABLE 
; (MUST BE IN REVERSE ORDER OF COMMAND TABLE) 


CMDAD: 
DW SSTEP ; ADDRESS OF SINGLE STEP ROUTINE 
DW EXAM ; ADDRESS OF EXAMINE REGISTERS ROUTINE 
DW SUBST 7 ADDRESS OF SUBSTITUTE MEMORY ROUTINE 
DW GOCMD 7 ADDRESS OF GO ROUTINE 


7 


I IIR IR IR IR OR IR IO I II IO I IO Ik 


DSPTB: ; TABLE FOR TRANSLATING CHARACTERS FOR OUTPUT 


7 


7 DISPLAY 
7 FORMAT CHARACTER 
ZERO EQU $ - DSPTB 
DB OF3H 50 
DB 60H fod 
DB OBSH oe 
DB OF 4H 713 
DB 66H oie. 
FIVE EQU S$ - DSPTB 
LETRS EQU S$ - DSPTB 
DB OD6H 7 5 AND S 
DB OD7H 7 6 
DB 70H fe 
EIGHT EQU $ - DSPTB 
DB OF7H 7 8 
DB 76H peg. 
LETRA EQU S$ - DSPTB 
DB 77H 7A 
LETRB EQU S$ - DSPTB 
DB OC7H ; B (LOWER CASE) 
LETRC EQU $ - DSPTB 
DB 93H 7 Cc 
LETRD EQU S$ - DSPTB 
DB OE5SH 7 D (LOWER CASE) 
LETRE EQU S$ - DSPTB 
DB 97H , E 
LETRF EQU $ - DSPTB 
DB 17H ol 
LETRH EQU $ - DSPTB 
DB 67H 7 HH 
LETRL EQU $ - DSPTB 
DB 83H 2 Ti 
LETRP EQU $ - DSPTB 
DB 37H ; P 
LETR EQU S$ - DSPTB 
DB 60H - 
LETRR EQU $ - DSPTB 
DB 05H ; R (LOWER CASE) 
BLANK EQU $ - DSPTB 
DB OOH 7; BLANK 


FI I IRI IIR IR IR IR IO I I IO IO I IO Ik 


; MESSAGES FOR OUTPUT TO DISPLAY 


7 


BLNKS: DB BLANK, BLANK, BLANK, BLANK ; FOR ADDRESS OR DATA FIELD 
ERMSG: DB BLANK, LETRE, LETRR, LETRR ; ERROR MESSAGE FOR ADDR. FIELD 
EXMSG: DB LETRE, BLANK, BLANK, BLANK ; EXECUTION MESSAGE 

; /FOR ADDRESS FIELD 
SGNAD: DB BLANK, BLANK, EIGHT, ZERO ; SIGN ON MESSAGE (ADDR. FIELD) 
SGNDT: DB EIGHT, FIVE ; SIGN ON MESSAGE (DATA FIELD) 


JODO IOI IO IOI III IOI IOI III II II EO I IOI IOI EO I A RGR A a a a ak 
RGPTB: ; REGISTER POINTER TABLE 
; THE ENTRIES IN THIS TABLE ARE IN THE SAME ORDER 


O3ac 
O3ad 
O3ae 
O3aft 
03b0 
03b1 
03b2 
03b3 
03b4 
03b5 
03b6 
03b7 
03b8 


03b9 


03b9 
03bd 
03c 
03c5 
03c9 
03cd 
03d 
03d5 
03a9 
03dd 
03e 
03e5 
03e9 


03ed 
03ed 
O3ee 
O03ef 
03£0 
03f1 
O03£2 
03£3 
O3£4 
O03£5 
O3£6 
03f7 
03£8 
03£9 
000d 


06 
09 
Oa 
Ob 
Oc 
07 
08 
00 
ol 
02 
03 
04 
05 


Aaaa4anaa4a»an4anan 


ee 
ec 
eb 
ea 
e9 
ed 
fl 
£0 
ef 
£5 
£4 
£3 
£2 


aAaaa4an4na»nnan 


05 


NUONUUNHAHHHo ou 


Oa 
Ob 
Oc 
Od 
Oe 
Of 
ds3 
10 
11 
10 
11 
10 
11 
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DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 


AS THE REGISTER DESIGNATOR KEYS ON THE KEYBOARD. 
EACH ENTRY CONTAINS THE REGISTER POINTER VALUE WHICH 
CORRESPONDS TO THE REGISTER DESIGNATOR. REGISTER 
POINTER VALUES ARE USED TO POINT INTO THE REGISTER 
NAME TABLE 


TABLE 


(NMTBL) 


(RGTBL) . 


INTERRUPT MASK 


Ss 


PH 


FLAGS 


AND REGISTER SAVE LOCATION 


I I IR OR IIR IR IR IR IO I I IO IO I I Ik 


7 


NMTBL: 


7 


DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 


LAI 
LAI 
LAI 
LA 
LAI 
LAI 
LAI 
LAI 
LAI 
LAI 
LAI 
LAI 
LAI 


DUOWUWWDKHHWdDddsoosoow 


7 


7 


REGISTER 
NAMES OF 
, BLANK, BLA 
, BLANK, BLA 
, BLANK, BLA 
, BLANK, BLA 
, BLANK, BLA 
, BLANK, BLA 
, BLANK, BLA 
, BLANK, BLA 
, BLANK, BLA 


AME TABLE 


, LETRA ; A REG 
,LETRB ; B REG 
,LETRC ; C REG 
,LETRD ; D REG 
,LETRE ; E REG 
,LETRE ; FLAGS 


,LETRH ; H REG 
,LETRL ; L REG 


,LETRS, LETRP, LETRH ; STACK 
,LETRS, LETRP, LETRL ; STACK 
, LETRP, LETRC, LETRH ; PROGRAM COUNTER HIGH BY'I'E 
, LETRP, LETRC, LETRL ; PROGRAM COUNTER LOW BYTE 


REGISTERS IN DISPLAY FORMAT 


STER 
STER 
STER 
STER 
STER 


,LETRI ; INTERRUPT MASK 


STER 
STER 
POINTER HIGH ORDER BYTE 
POINTER LOW ORDER BYTE 


I IR IR RR I IRR IR OR IR IO I I IO OI IO Ik 
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; REGISTER SAVE LOCATION TABLE 
; ADDRESSES OF SAVE LOCATIO 
; THE REGISTERS ARE DISPLAYED BY THE EXAMINE COMMAND 


7 


RGTBL: 


NUMRG 


DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
EQU 


ASAV AND 0 
BSAV AND 0 
CSAV AND 0 
DSAV AND 0 
ESAV AND 0 
FSAV AND 0 
ISAV AND 0 
HSAV AND 0 
LSAV AND 0 
SPHSV AND 

SPLSV AND 

PCHSV AND 

PCLSV AND 

($ - RGTBL 


0 
0 
0 
0 
) 


A REGISTER 
; B REGISTER 
C REGISTER 
D REGISTER 
7; E REGISTER 
; FLAGS 


; INTERRUPT MASK 


; H REGISTER 
; L REGISTER 
; STACK POINTER 
; STACK POINTER 


S OF REGISTERS IN THE ORDER IN WHICH 


HIGH ORDER BYTE 
LOW ORDER BYTE 


; PROGRAM COUNTER HIGH ORDER BYTE 
; PROGRAM COUNTER LOW ORDER BYTE 
; NUMBER OF ENTRIES IN 

; /REGISTER SAVE LOCATION TABLE 


I I II IR I IR III IR IR RIOR IO I IO I OI IO Ik 


I RR IRI IR IR IR IR IOI I IO OI I Ik 


SDK-85 TTY MONITOR 


I I RR IR IR IR IRR IR IORI IR IO I I IO IO I AO Ik 


I I IR I I IR IIR IR IORI IR IOI I IO RO I AO Ik 


; ABSTRACT 


; THIS PROGRAM WAS ADAPTED, WITH FEW CHANGES, 


FROM THE SDK-80 MONITOR. 


; THIS PROGRAM RUNS ON THE 8885 BOARD AND IS DESIGNED TO PROVIDE 
; THE USER WITH A MINIMAL MONITOR. BY USING THIS PROGRAM, 


; THE USEa CAN EXAMINE AND tHANGE MEMORY OR CPU REGISTERS, LOAD 
; A PROGRAM (IN ABSOLUTE HEX) INTO RAM, AND EXECUTE INSTRUCTIONS 
; ALREADY IN MEMORY. THE MONITOR ALSO PROVIDES THE USER WITH 

; ROUTINES FOR PERFORMING CONSOLE I/O. 


; PROGRAM ORGANIZATION 


; THE LISTING IS ORGANIZED IN THE FOLLOWING WAY. FIRST THE COMMAND 
; RECOGNIZER, WHICH IS THE HIGHEST LEVEL ROUTINE IN THE PROGRAM. 

; NEXT THE ROUTINES TO IMPLEMENT THE VARIOUS COMMANDS. FINALLY, 

; THE UTILITY ROUTINES WHICH ACTUALLY DO THE DIRTY WORK. WITHIN 

; EACH SECTION, THE ROUTINES ARE ORGANIZED IN ALPHABETICAL 

; ORDER, BY ENTRY POINT OF THE ROUTINE. 


7 MACROS USED IN THE TTY MONITOR ARE DEFINED IN THE KEYBOARD MONITOR. 


; LIST OF FUNCTIONS 


; GETCM 
; DCMD 
; GCMD 
; ICMD 
; MCMD 
; SCMD 
; XCMD 
; CI 

; CNVBN 
; ere) 

; CROUT 
; DELAY 
; ECHO 
; ERROR 
; FRET 
; GETCH 
; GETHX 
; GETNM 
; HILO 
; NMOUT 
; PRVAL 
; REGDS 
; RGADR 
; SRET 
; STHFO 
; STHLF 
; VALDG 
; VALDL 


I I IR IR IIR IR OR IO IO I IO IO I IO Ik 


; MONITOR EQUATES 


I I IRR IIR IRR IR OR IR IO I I IO OI IO Ik 


001b BRCHR EQU 1BH ; CODE FOR BREAK CHARACTER (ESCAPE) 

O7fa BRTAB EQU 07FAH ; LOCATION OF START OF BRANCH TABLE IN ROM 
000d CR EQU ODH ; CODE FOR CARRIAGE RETURN 

001b ESC EQU 1BH ; CODE FOR ESCAPE CHARACTER 

Ooof HCHAR EQU OFH ; MASK TO SELECT LOWER HEX CHAR FROM BYTE 
ooft INVRT EQU OFFH ; MASK TO INVSET HALF BYTE FLAG 

000a LF EQU OAH ; CODE FOR LINE FEED 

0000 LOWER EQU 0 ; DENOTES LOWER HALF OF BYTE IN ICMD 

OOOof NEWLN EQU OFH ; MASK FOR CHECKING MEMORY ADDR DISPLAY 
ooft PRTYO EQU OFFH ; MASK TO CLEAR PARITY BIT FROM CONSOLE CHAR NEW: CHANGED FROM 07FH 
OFFH (NO STRIPPING) 

0080 SSTRT EQU 80H ; SHIFTED START BIT 

0040 STOPB EQU 40H ; STOP BIT 


00c0 STRT EQU OCOH ; UNSHIFTED START BIT 
001b TERM EQU BH ; CODE FOR ICMD TERMINATING CHARACTER (ESCAPE) 
OOfft UPPER EQU OFFH ; DENOTES UPPER HALF OF BYTE IN ICMD 


; DELAY VALUES IF NO WAIT STATE CHANGED TO 600BAUD AT 6.00MHZ (WAS 100BAUD AT 6.144MHZ2) 


ooo1 LE -WAITS 

00cd IBTIM EQU 205 7413 71164 ; INTER-BIT TIME DELAY 

00cd OBTIM EQU 205 7413 71164 ; OUTPUT INTER-BIT TIME DELAY 

0334 TIM4 EQU 820 71651 74656 ; 4 BIT TIME DELAY 

0066 WAIT EQU 02 7206 7582 ; DELAY UNTIL READY TO SAMPLE BITS 
ENDIF 


; DELAY VALUES IF ONE WAIT STATE 


0000 ALE WAITS 
IBTIM EQU 67 7337 7930 ; INTER-BIT DELAY 
OBTIM EQU 67 #337) 7930 ; OUTPUT INTER-BIT TIME DELAY 
TIM4 EQU 670 71350 73720 ; 4 BIT TIME DELAY 
WAIT EQU 83 7168 7465 ; DELAY UNTIL READY TO SAMPLE BITS 
ENDIF 


I I IRI IR IIR IR OR IR IOI I IO OI AO Ik 


; RESTART ENTRY POINT 


I I IR IR IRI IRR IR IO IR IOI II OI IO Ik 


I RII IR OR IR IO I I IO IO I A Ik 


; PRINT SIGNON MESSAGE 


I IIR I IR IIR IR OR IR IO I II IO I IO Ik 


O3fa GO: 

03fa 21 aa O07 LXI H,SGNON ; GET ADDRESS OF SICNON MESSAGE 

03fd 06 07 MVI B, LSGNON ; COUNTER FOR CHARACTERS IN MESSAGE 
O3ff MSGL: 

O3fft 4e MOV C,M ; FETCH NEXT CHAR TO C REG 

0400 cd c4 05 CALL CO ; SEND IT TO THE CONSOLE 

0403 23 INX H 7 POINT TO NEXT CHARACTER 

0404 05 DCR B ; DECREMENT BYTE COUNTER 

0405 c2 ff 03 JNZ MSGL ; RETURN FOR NEXT CHARACTER 


I IR I I IIR RR OR IR IO IO IO I AO Ik 


; COMMAND RECOGNIZING ROUTINE 


I I IIR IR IRR IR IR IR IO I I IO IO I IO Ik 


; FUNCTION: GETCM 
; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: GETCH, ECHO,ERROR 

; DESTROYS: A,B,C,H,L,F/EF'S 

; DESCRIPTION: GETCM RECEIVES AN INPUT CHARACTER FROM THE USER 


; AND ATTEMPTS TO LOCATE THIS CHARACTER IN ITS COMMAND 

; CHARACTER TABLE. IF SUCCESSFUL, THE ROUTINE 

; CORRESPONDING TO THIS CHARACTER IS SELECTED FROM 

; A TABLE OF COMMAND ROUTINE ADDRESSES, AND CONTROL 

; IS TRANSFERRED TO THIS ROUTINE. IF THE CHARACTER 

; DOES NOT MATCH ANY ENTRIES, CONTROL IS PASSED TO 

; THE ERROR HANDLER. 
0408 GETCM: 
0408 21 e9 08 LXI H,MNSTK ; ALWAYS WANT TO RESET STACK PTR TO MONITOR 
040b £9 SPHL ; /STARTING VALUE SO ROUTINES NEEDN'T CLEAN UP 


040c 
040e 
0411 
0414 
0414 
0417 
O41a 
041b 
041le 
0421 
0421 
0422 
0425 
0426 
0427 
042a 
042d 
042d 


0430 
0431 
0432 
0433 
0434 
0435 
0436 


0437 
0437 
0439 
043c 
043d 
043e 
043e 
0441 
0442 
0445 
0446 
0449 
0449 
044b 
044e 
O44f 
0452 


0455 
0458 
045b 
045e 
045e 
045f 
0460 


0462 
0465 


Oe 
cd 
c3 


cd 
cd 
719 
Ol 
21 


be 
ca 
23 
od 
c2 
G3 


21 


09 
09 
Te 
23 
66 
6f 
e9 


Oe 
cd 
dl 
el 


cd 
te 
cd 
7d 
cd 


Oe 
cd 
Te 
cd 
cd 


d2 
cd 
63 


23 
7d 
e6 


c2 
G3 


2e 
£8 
14 


1f 
£8 


06 


bt 


2d 


21 


iba 


bl 


02 
5b 


eb 


c7 


c7 


20 
£8 


c7 
ad 


56 


eb 
08 


Of 


49 
3e 


05 
04 


06 
05 


00 


07 


04 


04 


06 


07 


06 


05 


06 


06 


05 


06 
06 


04 
05 
04 


04 
04 


GTCO3: 


GTCOS: 


GTC10: 


MV 
CAL 
JMP 


CAL 
CAL 
MOV 
LX 
LX 


CMP 
JZ 

INX 
DCR 
JNZ 
JMP 


LXI 


DAD 
DAD 
MOV 
INX 
MOV 
MOV 
PCH 


Cy tat 
L ECHO 
GTCO3 


L GETCH 

L ECHO 
A,C 
B,NCMDS 
H, CTAB 


L 


7 


7 


7 


7 


7 


PROMPT CH. 
SEND PROM 
WANT TO L 


GET COMMAI 


ARACTER TO C 
PT CHARACTER TO USER TERMINAL 
EAVE ROOM FOR RST BRANCH 


ND CHARACTER TO A 


ECHO CHARACTER TO USER 


PUT COMMA 
C CONTAIN 
HL POINTS 


Cc 

BRANCH IF 
ELSE, INC 
DECREMENT 
BRANCH IF 
E 


IF GOOD C 
/OF COMMA 
ADD WHAT 

ADD AGAIN 
GET LSP O 
POINT TO 

GET MSP O 
PUT LSP O 
NEXT INST 


ND CHARACTER INTO ACCUMULATOR 
S LOOP AND INDEX COUNT 
INTO COMMAND TABLE 


OMPARE TABLE ENTRY AND CHARACTER 


EQUAL - COMMAND RECOGNIZED 
REMENT TABLE POINTER 

LOOP COUNT 

NOT AT TABLE END 


LSE, COMMAND CHARACTER IS ILLEGAL 


OMMAND, LOAD ADDRESS OF TABLE 

D ROUTINE ADDRESSES 

IS LEFT OF LOOP COUNT 

- EACH ENTRY IN CADR IS 2 DYTES LONG 
F ADDRESS OF TABLE ENTRY TO A 

EXT BYTE IN TABLE 

F ADDRESS OF TABLE ENTRY TO H 

F ADDRESS OF TABLE ENTRY INTO L 
RGCTION COMES FROM COMMAND ROUTINE 


I I I I IR IIR IR OR AOR IOI I IO I I AO Ik 


COMMAND IMPLEMENTING ROUTINES 


I IR IR IR I IIR RR IR IR IOI I IO RO I IO Ik 


; FUNCTION: DCMD 
; INPUTS: NONE 

; OUTPUTS: 
ECHO, NMOUT, HILO, GETCM, CROUT, GETNM 
; DESTROYS: A,B,C,D,E,H,L,F/F'S 
ON: DCMD IMPLEMENTS THE DISPLAY MEMORY (D) COMMAND 


7; CALLS: 


; DESCRIPT 


7 


DCMD: 


DCMO5: 


DCM10: 


DCM15: 


7 


7 


MV 
CAL 
POP 
POP 


CAL 
MOV 
CAL 


NONE 


GET TWO N 


ENDING AD 


STARTING ADDRESS TO HL 


ECHO CARR 
DISPLAY A 


ADDRESS I 


USE BLANK 
GET CONTE 
DISPLAY C 
SEE IF AD 
/GREATER 
NEW: CORR 
CARRIAGE 
ALL DONE 


IF NONE T 
GET LOW O 
SEE IF LA 
/START OF 
NO - NOT 

YES - STA 


UMBERS FROM INPUT STREAM 


DRESS TO DE 


IAGE RETURN/LINE FEED 
DDRESS OF FIRST LOCATION IN LINE 


S 2 BYTES LONG 


AS SEPARATOR 

NTS OF NEXT MEMORY LOCATION 
ONTENTS 

DRESS OF DISPLAYED LOCATION IS 
THAN OR EQUAL TO ENDING ADDRESS 
ECTED TO JNC 

RETURN/LINE FEED TO END LINE 


O GO, POINT TO NEXT LOC TO DISPLAY 
RDER BITS OF NEW ADDRESS 

ST HEX DIGIT OF ADDRESS DENOTES 
NEW LINE 
AT END OF LINE 

RT NEW LINE WITH ADDRESS 


I I IR IR IRI IRI I OR IO IOI I IO I IO I IO Ik 


7 


7 


; FUNCTION: GCMD 
; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: ERROR, GETHX, RSTTF 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 


+ DESCRIPTION; GCMD IMPLEMENTS THE BEGIN EXECUTION (G) COMMAND 
0468 GCMD: 
0468 cd 26 06 CALL GETHX ; GET ADCRESS (IF PRESENT) FROM INPUT STREAM 
; FALSE GCM05 ; BRANCH IF NO NGMBER PRESENT 
046b d2 7d 04 JNC GCM05 
046e Ta OV A,D ; ELSE, GET TERMINATOR 
046£ fe Od CP CR ; SEE IF CARRIAGE RETURN 
0471 c2 11 06 INZ ERROR ; ERROR IF NOT PROPERLY TERMINATED 
0474 21 £2 08 LX H,PSAV ; WANT NUMBER TO REPLACE SAVE PGM COUNTER 
0477 dal: MOV M,C 
0478 23 INX H 
0479 70 OV M,B 
047a c3 83 04 JMP GCM10 
047d GCMO5: 
047d Ta OV A,D ; IF NO STARTING ADDRESS, MAKE SURE THAT 
047e fe Od CPL CR ; /CARRIAGE RETURN TERMINATED COMMAND 
0480 c2 11 06 JNZ ERROR ; ERROR IF NOT 
0483 GCM10: 
0483 c3 1b 03 JMP RSTOR ; RESTORE REGISTERS AND BEGIN EXECUTION 


; (RSTOR IS IN KEYBOARD MONITOR) 


I I RR I RI IIR IR OR IR IO I IO I OI AO Ik 


; FUNCTION: ICMD 

; INUTS: NONE 

7 OUTPUTS: NOE 

; CALLS: ERROR, ECHO, GETCH, VALDL, VALDG, CNVBN, STHLF, GETNM, CROUT 
; DESTROYS: A,B,C,D,E,H,L,F/F'S 


; DESCRIPYION: ICMD IMPLEMENTS THE INSERT CODE INTO MEMORY (I) COMMAND. 
0486 ICMD: 
0486 Oe O1 MV C,1 
0488 cd 5b 06 CALL GETNM ; GET SINGLE NUMBER FROM INPUT STREAM 
048b 36. ££ MV A, UPPER 
048d 32 fd 08 STA TEMP ; TEMP WILL HOLD THE UPPER/LOWER HALF BYTE FLAG 
0490 dl POP D ; ADDRESS OF START TO DE 
0491 ICMOS5: 
0491 cd 1f 06 CALL GETCH ; GET A CHARACTER FROM INPUT STREAM 
0494 4f MOV C,A ; NEW: CODE LINE WAS MISSING 
0495 cd £8 05 CALL ECHO ; ECHO IT 
0498 719 MOV A,C ; PUT CHARACTER BACK INTO A 
0499 fe lb €P. TERM ; SEE IF CHARACTER IS A TERMINATING CHARACTER 
049b ca c7 04 JZ ICM25 ; IF SO, ALL DONE ENTERING CHARACTERS 
049e cd 79 07 CALL VALDL ; ELSE, SEE IF VALID DELIMITER 
04al da 91 04 JC ICMO05 
04a4 cd 5e 07 CALL VALDG ; ELSE, CHECK TO SEE IF VALID HEX DIGIT 
04a7 d2 cl 04 INC ICM20 
O4aa cd bb 05 CALL CNVBN 7 CONVERT DIGIT TO BINARY 
O04ad 4f£ MOV C,A 7 MOVE RESULT TO C 
O4ae cd 3f 07 CALL STHLF ; STORE IN APPROPRIATE HALF WORD 
04b1 3a fd 08 LDA TEMP ; GET HALF BYTE FLAG 
04b4 b7 ORA A ; SET F/F'S 
04b5 c2 b9 04 JNZ ICM10 ; BRANCH IF FLAG SET FOR UPPER 
04b8 13 INX D ; IF LOWER, INC ADDRESS OF BYTE TO STORE IN 
04b9 ICM10: 
04b9 ee tt XR INVRT ; TOGGLE STATE OF FLAG 
04bb 32 fd 08 STA TEMP ; PUT NEW VALUE OF FLAG BACK 
04be c3 91 04 JMP ICM05 7 PROCESS NEXT DIGIT 
04cl ICM20: 
04cl cd 34 07 CALL STHFO ; ILLEGAL CHARACTER 
04c4 c3 11 06 JMP ERROR ; MAKE SURE ENTIRE BYTE FILLED THEN ERROR 
04c7 ICM25: 
04c7 cd 34 07 CALL STHFO ; HERE FOR ESCAPE CHARACTER - INPUT IS DONE 
04ca cd eb 05 CALL CROUT ; ADD CARRIAGE RETURN 
04cd c3 08 04 JMP GETCM 


7 
7 
RR IR IR IR IR IO I II I I IORI I A I A 


7 


; FUNCTION: MCMD 
; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: GETCM, HILO, GETNM 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 


; DESCRIPTION: MCMD IMPLEMENTS THE MOVE DATA IN MEMORY (M) COMMAND. 
04d0 MCMD: 
04da0 Oe 03 MVI G;3 
04d2 cd 5b 06 CALL GETNM ; GET 3 NUMBERS FROM INPUT STREAM 
04d5 el POP B ; DESTIUATION ADDRESS TO BC 
04d6 el POP H ; ENDING ADDRESS TO HL 
04d7 dl POP D ; STARTING ADDRESS TO DE 
04d8 MCMO5: 
04d8 e5 PUSH H ; SAVE ENDING ADDRESS 
04d9 62 MOV H,D 
O4da 6b MOV L,E ; SOURCE ADDEESS TO HL 
04db Te MOV A,M ; GET SOURCE BYTE 
04dc 60 MOV H,B 
04dd 69 MOV L,C ; DESTINATICN ADDPESS TO BL 
04de ae: MOV M,A ; MOVE BYTE TO DESTINATION 
O4dft 03 INX B ; INCREMENT DESTINATION ADDRESS 
04e0 78 MOV A,B 
04el bl ORA Cc ; TEST FOR DESTINATION ADDRESS OVERFLOW 
04e2 ca 08 04 JZ GETCM 7; IF SO, CAN TERMINATE COMMAND 
04e5 13 INX D 7; INCREMENT SOURCE ADDRESS 
04e6 el POP H ; ELSE, GET BACK ENDING ADDRESS 
04e7 cd a0 06 CALL HILO ; SEE IF ENDING ADDR>=SOURCE ADDR 
O4ea d2 08 04 JNC GETCM 
04ed c3 d8 04 JMP MCMO5 ; MOVE ANOTHER BYTE NEW: WAS ICM05 
SRP REDE dR ER RE RK Hee RE 
; FUNCTION: SCMD 
; INPUTS: NONE 
; OUTPUTS: NONE 
; CALLS: GETHX, GETCM, NMOUT, ECHO 
; DESTROYS: A,B,C,D,E,H,L,F/E'S 
; DESCRIPTION: SCMD IMPLEMENTS THE SUBSTITUTE INTO MEMORY (S) COMMAND. 
04£0 SCMD: 
04f0 cd 26 06 CALL GETHX ; GET A NUMBER, IF PRESENT, FROM INPUT 
04£3 cs PUSH B 
o4f4 el POP H ; GET NUHBER TO HL - DENOTES MEMORY LOCATION 
04£5 SCMOS: 
04£5 Ja MOV A,D ; GET TERMINATOR 
O4f6 fe 20 CP eet ; SEE IF SPACE 
04f8 ca 00 05 JZ SCM10 7 YES - CONTINUE PROCESSING 
04fb fe 2c CP ip ; ELSE, SEE IF COMMA 
04fd c2 08 04 JINZ GETCM 7; NO - TERMINATE COMMAND 
0500 SCM10: 
0500 Te MOV A,M 7; GET CONTENTS OF SPECIFIED LOCATION TO A 
0501 cd c7 06 CALL NMOUT 7 DISPLAY CONTENTS ON CONSOLE 
0504 Oe 2d MV Cyst 
0506 cd £8 05 CALL ECHO ; USE DASH FOR SEPARATOR 
0509 cd 26 06 CALL GETHX ; GET NEW VALUE FOR MEMORY LOCATION, IF ANY 
050c d2 10 05 JNC SCM15 
O50f£ aia MOV M,C ; ELSE, STORE LOWER 8 BITS OF NUMBER ENTERED 
0510 SCM15: 
0510 23 INX H 7; INCREMENT ADDRESS OF MEMORY LOCATION TO VIEW 
0511 c3 £5 04 JMP SCMO05; 
SRP Gea ee se 
; FUNCTION: XCMD 
; INPUTS: NONE 
; OUTPUTS: NONE 
; CALLS: GETCH, ECHO, REGDS, GETCM, ERROR, RGADR, NMOUT, CROUT, GETHX 
; DESTROYS: A,B,C,D,E,H,L,F/F'S 
; DESCRIPTION: XCMD IMPLEMENTS THE REGISTER EXAMINE AND CHANGE (X) 
i COMMAND 
0514 XCMD: 


0514 cd 1f 06 CALL GETCH ; GET REGISTER IDENTIFIER 

0517. 4£ MOV C,A ; NEW: CODE LINE WAS MISSING 

0518 cd £8 05 CALL ECHO ; ECHO IT 

051b  =79 MOV A,C 

051c fe 0d cP CR 

O5le c2 27 05 JNZ XCM05  ; BRANCH IF NOT CARRIACE RETURN 

0521 cd ea 06 CALL REGDS ; ELSE, DISPLAY REGISTER CONTENTS 

0524 c3 08 04 UMP GETCM ; THEN TERMINATE COMMAND 

0527 XCMOS5: 

0527 4£ MOV C,A ; GET REGISTER IDENTIFIER TO C 

0528 cd 1b 07 CALL RGADR ; CONVERT IDENTIFIER INTO RTAB TABLE ADDR 
052b cS PUSH B 

052c 20Oel POP H ; PUT POINTER TO REGISTER ENTRY INTO HL 
052d Oe 20 MV Gir 

052£ cd £8 05 CALL ECHO ; ECHO SPACE TO USER 

0532. «79 MOV A,C 

0533 32 fd 08 STA TEMP ; PUT SPACE INTO TEMP AS DELIMITER 

0536 XCM1O: 

0536 3a fd 08 LDA TEMP ; GET TERMINATOR 

0539 fe 20 CPI vo ; SEE IF A BLANK 

053b ca 43 05 JZ XCM15  ; YES - GO CHECK POINTER INTO TABLE 

053e fe 2c CPI ut ; NO - SEE IF COMMA 

0540 c2 08 04 INZ GETCM ; NO - MUST BE CARRIAGE RETURN TO END COMMAND 
0543 XCM15: 

0543+ «~7Te MOV A,M 

0544 b7 ORA A ; SET F/F'S 

0545 c2 4e 05 INZ XCM18 ; BRANCH IF AT END OF TABLE 

0548 cd eb 05 CALL CROUT ; NEW: CODE WAS CHANGED 

0545 c3 08 04 IMP GETCM ; NEW: CODE WAS CHANGED 

054e XCM18: 

054e e5 PUSH il ; PUT POINTER ON STACK 

054f Se MOV E,M 

0550 16 08 MVI D,RAMST SHR 8 ; FETCH ADDRESS OF SAVE LOCATION FROM 
0552-23 INX - ; /TABLE 

0553 46 MOV B,M ; FETCH LENGTH FLAG FROM TABLE 

0554 d5 PUSH D ; SAVE ADDRESS OF SAVE LOCATION 

0555 d5 PUSH D 

0556 el POP H ; MOVE ADDRESS TO HL 

0557. c5 PUSH B ; SAVE LENGHT FLAG 

0558 + Te MOV A,M ; GET 8 BITS OF REGISTER FROM SAVE LOCATION 
0559 cdc7 06 CALL MOUT  ; DISPLAY IT 

055c fil POP Psw ; GET BACK LENGTH FLAG 

055d s«f5 PUSH Psw ; SAVE IT AGAIN 

055e = b7 ORA A ; SET F/F'S 

055£ ca 67 05 Pr XCM20  ; IF 8 BIT REGISTER, NOTHING MORE TO DISPLAY 
0562 2b DCX H ; ELSE FOR 16 BIT REGISTER, GET LOWER 8 BITS 
0563 + «=+7e MOV A,M 

0564 cdc7 06 CALL NMOUT ; DISPLAY THEM 

0567 XCM20: 

0567 Oe 2d MVI C,'-' 

0569 ca £8 05 CALL ECHO ; USE DASH AS SEPARATOR 

056c ca 26 06 CALL GETHX ; SEE IF THERE IS A VALUE TO PUT INTO REGISTER 
056£ d2 87 05 INC XCM30 

0572 7a MOV A,D 

0573 32 fd 08 STA TEMP ; ELSE, SAVE THE TERMINATOR FOR NOW 

0576 = «fl POP PSW ; GET BACK LENGTH FLAG 

0577 ~~ el POP il ; PUT ADDRESS OF SAVE LOCATION IN HL 

0578 b7 ORA A ; SET F/F'S 

0579 ca Te 05 JZ XCM25  ; IF 8 BIT REGISTER, BRANCH 

057c 70 MOV M,B ; SAVE UPPER 8 BITS 

057d =. 2b DCX il ; POINT TO SAVE LOCATION FOR LOWER 8 BITS 
057e XCM25: 

O57e 71 MOV ic ; STORE ALL OF 8 BIT OR LOWER 1/2 OF 16 BIT REGISTER 
O57£ XCM27: 

O57£ 11 03 00 LXI D,RTABS ; SIZE OF ENTRY IN RTAB TABLE 

0582 «el POP H ; POINTER INTO REGISTER TABLE RTAB 

0583 «419 DAD D ; ADD ENTRY SIZE TO POINTER 

0584 c3 36 05 UMP XCM10 ; DO NEXT REGISTER 

0587 XCM30: 

0587 7a MOV A,D ; GET TERMINATOR 

0588 32 fd 08 STA TEMP ; SAVE IN MEMORY 

058b dl POP D ; CLEAR STACK OF LENGTH FLAG AND ADDRESS 
058c dl POP D ; /OF SAVE LOCATION 

058d c3 7£ 05 JMP XCM27. ; GO INCREMENT REGISTER TABLE POINTER 


7 
7 
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; UTILITY ROUTINES 


I I IRI I I IIR IR IR IO IO I I IO OI IO Ik 


; FUNCTION: CI 

; INPUTS: NONE 

; OUTPUTS: A - CHARACTER FROM TTY 

7 CALLS: DELAY 

; DESTROYS: A,F/F'S 

; DESCRIPTION: CI WAITS UNTIL A CHARACTER HAS BEEN ENTERED AT THE 


; TTY AND THEN RETURNS THE CHARACTER, VIA THE A 
; REGISTER, TO THE CALLING ROUTINE. THIS ROUTINE 
; IS CALLED BY THE USER VIA A JUMP TABLE IN RAM. 

0590 CL: 

0590 £3 DI 

0591 d5 PUSH D 7; SAVE DE 

0592 ETO5s 

0592 20 RIM ; GET INPUT BIT 

0593 17 RAL ; INTO CARRY WITH IT 

0594 da 92 05 JC C105 ; BRANCH IF NO START BIT 

0597 11 66 00 LX D,WAIT ; WAIT UNTIL MIDDLE OF BIT 

059a cd f1 05 CALL DELAY 

059d cS PUSH B 7; SAVE BC 

059e 01 08 00 LX B,8 ; B<--0, C<--# BITS TO RECEIVE 

O5al CI10: 

O5al 1 cd 00 LX D, IBTIM 

05a4 cd f1 05 CALL DELAY ; WAIT UNTIL MIDDLE OF NEXT BIT 

05a7 20 RIM ; GET THE BIT 

05a8 7 RAL 7 INTO CARRY 

05a9 78 OV A,B ; GET PARTIAL RESULT 

O5aa £ RAR ; SHIFT IN NEXT DATA BIT 

O5ab 47 MOV B,A ; REPLACE RESULT 

O5ac Od DCR Cc ; DEC COUNT OF BITS TO GO 

O5ad c2 al 05 JNZ C110 ; BRANCH IF MORE LEFT 

O05b0 1 cd 00 LXI D,IBTIM ; ELSE, WANT TO WAIT OUT STOP BIT 

05b3 cd f1 05 CALL DELAY 

O5b6 78 MOV A,B ; GET RESULT 

O5b7 cl POP B 

05b8 dl POP D ; RESTORE SAVED REGISTERS 

05b9 00 NOP 

O5ba cQ RET ; THAT'S IT 


I I IR IR I IR I IIR IR OR IO IO I I IO OI IO Ik 


; FUNCTION: CNVBN 

; INPUTS: C - ASCII CHARACTER '0'-'9' OR 'A'-'F! 

+ OUTPUTS: A - 0 - F HEX 

; CALLS: NOTHING 

; DESTROYS: A,F/F'S 

; DESCRIPTION: CNVBN CONVERTS THE ASCII REPRESENTATION OF A HEX 


; CHARACTER INTO ITS CORRESPONDING BINARY VALUE. CNVBN 
; DOES NOT CHECK THE VALIDITY OF ITS INPUT. 

O5bb CNVBN: 

O5bb 719 MOV A,C 

O5be dé 30 SUI ro" ; SUBTRACT CODE FOR '0' FROM ARGUMENT 

O5be fe 0a CPI 10 ; WANT TO TEST FOR RESULT 0 TO 9 

05c0 £8 RM ; IF SO, THEN ALL DONE 

O05cl dé 07 SUI 7 ; ELSE, RESULT BETWEEN 17 AND 23 DECIMAL 

05c3 co. RET ; SO RETURN AFTER SUBTRACTING BIAS OF 7 


I I RII I IORI IR IOI I IO I I Ik 


; FUNCTION: CO 

; INPUTS: C - CHARACTER TO OUTPUT TO TTY 
; OUTPUTS: C - CHARACTER OUTPUT TO TTY 

7 CALLS: DELAY 

; DESTROYS: A,F/F'S 


05c4 
05c4 
05c5 
05c6 
05c6 
O05c7 
05c9 
O05cb 
O5cb 


oo 
aun 
QQ 
ha 


oS O'S. 0S 00,6 
aAaaanwna»a»nwnan 
2acgcagggaagd 

OTM MONO BWD 


10) 


fo} 
oO 
10) 

fo} 


O5eb 
O05eb 
O5ed 
O5£0 


O5f1 
O5f1 
O5f2 
05£3 
O5f4 
O5f£7 


£3 
cS 


d5 
38 
06 


30 
11 
cd 
79 
1£ 
4f 
3¢ 
1f£ 
ee 
05 
£2 
36 
30 
11 
cd 
dl 
cl 
00 
cQ 


Oe 
cd 
cQ 


1b 
Ta 
b3 
c2 
cQ 


c0 
08 


cd 00 
£105 


80 


80 


cb 05 
40 


34 03 
f1 05 


Od 
£8 05 


f1 05 


; DESCRIPTION: CO SENDS ITS ARGUMENT TO THE TTY 


CO: 
DI 
PUS 

C02: 
PUS 
MV 
MV 

coos: 
SIM 
LX 
CAL 
MOV 
RAR 
MOV 
MV 
RAR 
XR 
DCR 
JP 
MV 
SIM 
LX 
CAL 
POP 
POP 
NOP 
RET 


H 


H 


L 


L 


B 7; SAVE BC 

D 7; SAVE DE 

A,STRT ; START BIT MASK 

B,8 7 B WILL COUNT BITS TO SEND NEW: CHANGED TO 8BIT 


; SEND A BIT 
D,OBTIM ; WAIT FOR TTY TO HANDLE IT 


DELAY 

A,C ; PICK UP BITS LEFT TO SEND 
; LOW ORDER BIT TO CARRY 

C,A ; PUT REST BACK 


A,SSTRT ; SHIFTED ENABLE BIT 
; SHIFT IN DATA BIT 


80H ; COMPLEMENT DATA BIT 
B 7 DEC COUNT 
coos ; SEND IF MORE BITS NEED TO BE SENT 


A,STOPB ; ELSE, SEND STOP BITS 


D,TIM4 ; WAIT 4 BIT TIME (FAKE PARITY + 3 STOP BITS) 
DELAY 

D 

B ; RESTORE SAVED REGISTERS 


; ALL DONE 
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; FUNCTION: CROUT 

; INPUTS: NONE 

NONE 

; CALLS: ECHO 

; DESTROYS: A,B,C,F/F'S 

; DESCRIPTION: CROUT SENDS A CARRIAGE RETURN (AND HENCE A LINE 


; OUTPUTS: 


FEED) TO THE CONSOLE. 


C,CR 
ECHO ; OUTPUT CARRIAGE RETURN TO USER TERMINAL 


I IR IR I IIR I IIR IR OR IO IOI I IO OI A Ok 


; FUNCTION DELAY 


; INPUTS: D 
; OUTPUTS: 


DELAY: 


E 


- 16 BIT INTEGER DENOTING NUMBER OF TIMES TO LOOP 


NONE 
; CALLS: NOTHING 

; DESTROYS: A,D,E,F/F'S 

; DESCRIPTION: DELAY DOES NOT RETURN TO CALLER UNTIL INPUT ARGUMENT 


IS COUNTED DOWN TO 0. 


D ; DECREMENT INPUT ARGUMENT 
A,D 

E 

DELAY ; IF ARGUMENT NOT 0, KEEP GOING 
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; FUNCTION: ECHO 


7 INPUTS: C 
; OUTPUTS: 
7 CALLS: CO 


c 


- CHARACTER TO ECHO TO TERMINAL 
- CHARACTER ECHOED TO TERMINAL 


; DESTROYS: A,B,,F/F'S 
; DESCRIPTION: ECHO TAKES A SINGLE CHARACTER AS INPUT AND, VIA 


THE MONITOR, SENDS THAT CHARACTER TO THE USER 


O5£8 
O5f8 
O5£9 
O5fb 
O5fc 
Osft 
0601 
0601 
0604 
0606 
0607 
060a 
060c 
O60ft 
O60f 
0610 


0611 
0611 
0613 
0616 
0619 


O61c 
061c 
061d 
O6le 


Oelt 
Oelt 
0622 
0624 
0625 


41 
3e 
b8 
c2 
Oe 


cd 
3e 
b8 
e2 
Oe 
cd 


48 
ep. 


Oe 
cd 
cd 
a3 


37 
3f 
cQ 


cd 
e6 
4f 
cQ 


1b 


01 06 
24 


c4 05 
Od 


Of 06 
Oa 
c4 05 


2a 

f8 05 
eb 05 
08 04 


90 05 
ff 


; TERMINAL. A CARRIAGE RETURN IS ECHOED AS A CARRIAGE 


? RETURN LINE FEED, AND AN ESCAPE CHARACTER IS ECHOED AS $. 
ECHO: 
MOV B,C ; SAVE ARGUMENT 
MV A,ESC 
CMP B ; SEE IF ECHOING AN ESCAPE CHARACTER 
INZ ECHO5 7 NO - BRANCH 
MV Cee 7 YES - ECHO AS §$ 
ECHO5: 
CALL CO 7 DO OUTPUT THROUGH MONITOR 
MV A,CR 
CMP B ; SEE IF CHARACTER ECHOED WAS A CARRIAGE RETURN 
INZ ECH10 y NO - NO NEED TO TAKE SPECIAL ACTION 
MV C, LF ; YES - WANT TO ECHO LINE FEED, TOO 
CALL co 
ECH10: 
MOV C,B ; RESTORE ARGUMENT 
RET 


7 
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; FUNCTION ERROR 

; INPUTS: NONE 

; OUTPUTS: NONE 

; CALLS: ECHO, CROUT, GETCM 

; DESTROYS: A,B,C,F/F'S 

; DESCRIPTION: ERROR PRINTS 'THE ERROR CHARACTER (CURRENTLY AN ASTERISK) 


; ON THE CONSOLE, FOLLOWED BY A CARRIAGE RETURN-LINE FEED, 
; AND THEN RETURNS CONTROL TO THE COMMAND RECOGNIZER. 
ERROR: 

MVI c,'*! 

CALL ECHO ; SEND * TO CONSOLE 

CALL CROUT ; SKIP TO BEGINNING OF NEXT LINE 

UMP GETCM ; TRY AGAIN FOR ANOTHER COMMAND 
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; FUNCTION: FRET 

; INOUTS: NONE 

; OUTPUTS: CARRY - ALWAYS 0 

; CALLS: NOTHING 

; DESTROYS: CARRY 

; DESCRIPTION: FRET IS JUMPED TO BY ANY ROUTINE THAT WISHES TO 


; INDICATE FAILURE ON RETURN. FRET SETS THE CARRY 
; FALSE, DENOTING FAILURE, AND THEN RETURNS TO THE 
; CALLER OF THE ROUTINE INVOKING FRET. 
FRET: 
STC ; FIRST SET CARRY TRUE 
CMC ; THEN COMPLEMENT IT TO MAKE IT FALSE 
RET ; RETURN APPROPRIATELY 
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; FUNCTION: GETCH 

; INPUTS: NONE 

; OUTPUTS: C - NEXT CHARACTER IN INPUT STREAM 

7 CALLS: CI 

; DESTROYS: A,C,F/EF'S 

; DESCRIPTION: GETCH RETURNS THE NEXT CHARACTER IN THE INPUT STREAM 


; TO THE. CALLING PROGRAM. 
GETCH: 
CALL CI ; GET CHARACTER FROM TERMINAL 
ANI PRTYO ; TURN OFF PARITY BIT IN CASE SET BY CONSOLE 
MOV C,A ; PUT VALUE IN C REGISTER FOR RETURN 
RET 
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; FUNCTION: GETHX 


0626 
0626 
0627 
062a 
062c 
062c 
062£ 
0630 
0633 
0636 
0639 
063a 
063b 
063c 
063d 
063e 
063£ 
0642 
0645 
0645 
0648 
064b 
064e 
0650 
0651 
0652 
0653 
0654 
0656 
0657 
0658 


065b 
065b 
065d 
065e 
0660 
0661 


e5 
21 
le 


cd 
4f 
cd 
cd 
d2 
51 
e5 
el 
el 
Tb 
b7 
c2 
ca 


cd 
d2 
cd 
le 
29 
29 
29 
29 
06 
4f 
09 
@3 


2e 
79 
e6 
c8 
67 


00 
00 


1f 


£8 


719 
45 


32 
Le 


pe 
11 


bb 
ED 


00 


2c 


03 


03 


00 


06 


05 
07 
06 


07 
06 


07 


06 
05 


06 


; INPUTS: NONE 
; OUTPUTS: BC - 16 BIT INTEGER 


; D - CHARACTER WHICH TERMINATED THE INTEGER 
; CARRY - 1 IF FIRST CUARACTER NOT DELIMITER 
; - 0 IF FIRST CHARACTER IS DELIMITER 


7 CALLS: GETCH, ECHO, VALDL, VALDG, CNVBN, ERROR 

; DESTROYS: A,B,C,D,E,F/F'S 

; DESCRIPTION: GETHX ACCEPTS A STRING OF HEX DIGITS FROM THE INPUT 

; STREAM AND RETURNS THEIR VALUE AS A 16 BIT BINARY 
INTEGER. IF MORE THAN 4 HEX DIGITS ARE ENTERED, 
ONLY THE LAST 4 ARE USED. THE NUMBER TERMINATES WHEN 
A VALID DELIMITER IS ENCOUNTERED. THE DELIMITER IS 
ALSO RETURNED AS AN OUTPUT OF THE FUNCTION. ILLEGAL 

; CHARACTERS (NOT HEX DIGITS OR DELIMITERS) CAUSE AN 
ERROR INDICATION. IF THE FIRST (VALID) CHARACTER 
ENCOUNTERED IN THE INPUT STREAM IS NOT A DELIMITER, 
GETHX WILL RETURN WITH THE CARRY BIT SET TO 1; 
OTHERWISE, THE CARRY BIT IS SET TO 0 AND THE CONTENTS 
OF BC ARE UNDEFINED. 


GETHX 

PUSH H ; SAVE HL 

LX H,0 ; INITIALIZE RESULT 

MV E,0 ; INITIALIZE DIGIT FLAG TO FALSE 
GHX05: 

CALL GETCH ; GET A CHARACTER 

MOV C,A 7 NEW: CODE LINE WS MISSING 

CALL ECHO ; ECHO THE CHARACTER 

CALL VALDL ; SEE IF DELIMITER 

JNC GHX10 7 NO - BRANCH 

MOV D,C ; YES -ALL DONE, BUT WANT TO RETURN DELIMITER 

PUSH H ; 

POP B ; MOVE RESULT TO BC 

POP H ; RESTORE HL 

MOV A,E ; GET FLAG 

ORA A ; SET F/F'S 

INZ SRET ; IF FLAG NON-O, A NUMBER HAS BEEN FOUND 

JZ FRET ; ELSE, DELIMITER WAS FIRST CHARACTER 
GHX10 

CALL VALDG ; IF NOT DELIMITER, SEE IF DIGIT 

INC ERROR ; ERROR IF NOT A VALID DIGIT, EITHER 

CALL CNVBN ; CONVERT DIGIT TO ITS BINARY VALUE 

MVI E,OOFFH ; SET DIGIT FLAG NON-0O 

DAD H ¢ 2 

DAD H pene 

DAD H 7 *8 

DAD H AXLE. 

MVI B,0 ; CLEAR UPPER 8 BITS OF BC PAIR 

MOV C,A ; BINARY VALUE OF CHARACTER INTO C 

DAD B ; ADD THIS VALUE TO PARTIAL RESULT 

JMP GHX05 ; GET NEXT CHARACTER 
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; FUNCTION: GETNM 

; INPUTS: C - COUNT OF NUMBERS TO FIND IN INPUT STREAM 

; OUTPUTS: TOP OF STACK -NUMBERS FOUND IN REVERSE ORDER (LAST ON TOP 
: OF STACK) 

; CALLS: GETHX,HILO,ERROR 

; DESTROYS: A,B,C,D,E,H,L,F/F'S 

; DESCRIPTION: GETNM FINDS A SPECIFIED COUNT OF NUMBERS, BETWEEN 1 


; AND 3, INCLUSIVE, IN THE INPUT 
; STREAM AND RETURNS THEIR VALUES ON THE STACK. IF 2 
; OR MORE NUMBERS ARE REQUESTED, THEN THE FIRST MUST BE 
; LESS THAN OR EQUAL TO THE' SECOND, OR THE FIRST AND 
; SECOND NUMBERS WILL BE SET EQUAL. THE LAST NUMBER 
; REQUESTED MUST BE TERMINATED BY A CARRIAGE RETURN 
; OR AN ERROR INDICATION WILL RESULT. 
GETNM: 

MVI L,3 ; PUT MAXIMUM'ARGUMENT COUNT INTO L 

MOV A,C ; GET THE ACTUAL ARGUMENT COUNT 

ANI 3 + FORCE TO MAXIMUM OF 3 

RZ ; IF 0, DON'T BOTHER TO DO ANYTHIING 

MOV H,A ; ELSE, PUT ACTUAL COUNT INTO H 


0662 
0662 
0665 
0668 
0669 
066a 
066b 
066e 
O66f 
0671 
0674 
0677 
0677 
0678 
O67a 
067d 
0680 
0681 
0682 
0685 
0685 
0686 
0687 
068a 
068a 
068b 
068c 
068d 
0690 
0693 
0694 
0695 
0695 
0696 
0697 
0698 
0699 
0699 
069a 
069b 
069c 
069d 


06a0 
06a0 
O6al 
06a2 
06a3 
06a4 
06a5 
06a8 
06a9 
O6aa 
O6ab 
O6ae 
O6at 
06b0 
06b2 
06b3 
06b4 
06b6 
06b7 


cd 
d2 
cS 
2d 
25 
ca 
Ta 
fe 
ca 
c3 


Ta 
fe 
c2 
Ol 
7a 
b7 
ca 


cS 
2d 
c2 


el 
dl 
el 
cd 
d2 
54 
5d 


e3 
das 
C5 
a5 


3d 
£8 
el 
e3 
a3 


cS 
47 
e5 
Ta 
b3 
ca 
23 
Te 
b5S 
ca 
el 
a5 
3@ 
aa 
57 
3e 
ab 
SE 


GNMO5 
26 06 CALL GETHX ; GET A NUMBER FROM INPUT STREAM 
11 06 INC ERROR  ; ERROR IF NOT THERE -TOO FEW NUMBERS 
PUSH B ; ELSE, SAVE NUMBER ON STACK 
DCR L ; DECREMENT MAXIMUM ARGUMENT COUNT 
DCR H ; DECREMENT ACTUAL ARGUMENT COUNT 
717 06 JZ GNM10  ; BRANCH IF NO MORE NUMBERS WANTED 
MOV A,D ; ELSE, GET NUMBER TERMINATOR TO A 
0d CPI CR ; SEE IF CARRIAGE RETURN 
11 06 JZ ERROR  ; ERROR IF SO - TOO FEW NUMBERS 
62 06 IMP GNMOS  ; ELSE, PROCESS NEXT NUMBER 
GNM1O 
MOV A,D ; WHEN COUNT 0, CHECK LAST TERMINATOR 
0d CPI CR ; 
11 06 INZ ERROR  ; ERROR IF NOT CARRIAGE RETURN 
ff ff LXI B,OFFFFH; HL GETS LARGEST NUMBER 
Mov A,L ; GET WHAT'S LEFT OF MAXIMUM ARG COUNT 
ORA A ; CHECK FOR 0 
8a 06 JZ GNM20. ; IF YES, 3 NUMBERS WERE INPUT 
GNM15 
PUSH B ; IF NOT, FILL REMAINING ARGUMENTS WITH OFFFFH 
DCR L 
85 06 INZ GNM15 
GNM2 0 
POP B ; GET THE 3 ARGUMENTS OUT 
POP D 
POP H 
a0 06 CALL HILO ; SEE IF FIRST >= SECOND 
95 06 INC GNM25 =; NO - BRANCH 
MOV D,H 
MOV E,L ; YES - MAKE SECOND EQUAL TO THE FIRST 
GNM25 
XTHL ; PUT FIRST ON STACK -GET RETURN ADDR 
PUSH D ; PUT SECOND ON STACK 
PUSH B ; PUT THIRD ON STACK 
PUSH H ; PUT RETURN ADDRESS ON STACK 
GNM30 
DCR A ; DECREMENT RESIDUAL COUNT 
RM ; IF NEGATIVE, PROPER RESULTS ON STACK 
POP H ; ELSE, GET RETURN ADDR 
XTHL ; REPLACE TOP RESULT WITH RETURN ADDR 
99 06 JMP GNM30 ; TRY AGAIN 
stack ARERR ok OW ASEAE RIN AN ERS MER NED WH EH Use On RENEE CA DES EL RRS 
; FUNCTION: HILO 
; INPUTS: DE - 16 BIT INTEGER 
7 HL -16 BIT INTEGER 
; OUTPUTS: CARRY - 0 IF HL<DE 
j - 1 IF HL>=DE 
; CALLS: NOTHING 
; DESTROYS: F/F'S 
; DESCRIPTION: HILO COMPARES THE 2 16 BIT INTEGERS IN HL AND DE. THE 
i INTEGERS ARE TREATED AS UNSIGNED NUMBERS. THE CARRY 
; BIT IS SET ACCORDING TO THE RESULT OF THE COMPARISON. 
HILO 
PUSH B ; SAVE BC 
Mov B,A ; SAVE A IN B REGISTER 
PUSH H ; SAVE HL PAIR 
MOV A,D ; CHECK FOR DE = 0000H 
ORA E 
cl 06 JZ HILOS ; WE'RE AUTOMATICALLY DONE IF IT IS 
INX H ; INCREMENT HL BY 1 
Mov A,H ; WANT TO TEST FOR 0 RESULT AFTER 
ORA L ; /INCREMENTING 
cl 06 JZ HILOS ; IF SO, HL MUST HAVE CONTAINED OFFFFH 
POP H ; IF NOT, RESTORE ORIGINAL HL 
PUSH D ; SAVE DE 
ff MVI A,OFFH ; WANT TO TAKE 2'S COMPLEMENT OF DE CONTENTS 
XRA D 
MOV D,A 
ff MVI A, OFFH 
XRA E 
MOV E,A 


06b8 
06b9 
O6ba 
06bb 
06be 
06bda 
O6be 
O6bE 
06c0 
O6cl 
06cl1 
06c2 
06c3 
06c4 


06c7 
06c7 
06c8 
06c9 
O6ca 
06cb 
O6cc 
O6cd 
O6cf£ 
06d0 
06d3 
06d6 
06da7 
06da9 
0é6da 
06dd 
06e0 
O6el 


06e2 
06e2 
06e5 
06e7 
06e8 
06e9 


13 
7d 
83 
re 
8a 
dl 
78 
cl 
eo. 


el 
78 
el 


c3 32 07 


e5 
£5 
Of 
Of 
Of 
Of 
e6 
4f 
cd 
cd 
fl 
e6 
4f 
cd 
cd 
el 
cQ 


Of 


e2 
£8 


Of 


e2 
£8 


06 
05 


06 
05 


21, 165 ~07 


06 
09 
de 
cQ 


00 


INX D ; 2"S COMPLEMENT OF DE TO DE 

MOV Byati 

ADD E ; ADD HL AND DE 

MOV A,H 

ADC D ; THIS OPERATION SETS CARRY PROPERLY 

POP D ; RESTORE ORIGINAL DE CONTENTS 

MOV A,B ; RESTORE ORIGINAL CONTENTS OF A 

POP B ; RESTORE ORIGINAL CONTENTS OF BC 

RET ; RETURN WITH CARRY SET AS REQUIRED 
HILOS: 

POP H ; IF HL CONTAINS OFFFFH, THEN CARRY CAN 

MOV A,B ; /ONLY BE SET TO 1 

POP B ; RESTORE ORIGINAL CONTENTS OF REGISTERS 

UMP SRET ; SET CARRY AND RETURN 
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FUNCTION: NMOUT 
INPUTS: A - 8 BIT INTEGER 
OUTPUTS: NONE 
CALLS: ECHO, PRVAL 
DESTROYS: A,B,C,F/F'S 
DESCRIPTION: NMOUT CONVERTS THE 8 BIT, UNSIGNED INTEGER IN THE 
A REGISTER INTO 2 ASCII CHARACTERS. THE ASCII CHARACTERS 
ARE THE ONES REPRESENTING THE 8 BITS. THESE TWO 
CHARACTERS ARE SENT TO THE CONSOLE AT THE CURRENT PRINT 
POSITION OF THE CONSOLE. 


NMOUT: 
PUSH H ; SAVE HL -DESTROYED BY PRVAL 
PUSH PSW ; SAVE ARGUMENT 
RRC 
RRC 
RRC 
RRC ; GET UPPER 4 BITS TO LOW 4 BIT POSITIONS 
AN HCHAR ; MASK OUT UPPER 4 BITS - WANT 1 HEX CHAR 
MOV C,A 
CALL PRVAL ; CONVERT LOWER 4 BITS TO ASCII 
CALL ECHO ; SEND TO TERMINAL 
POP PSW 7 GET BACK ARGUMENT 
AN HCHAR ; MASK OUT UPPER 4 BITS - WANT 1 HEX CHAR 
MOV C,A 
CALL PRVAL 
CALL ECHO 
POP H ; RESTORE SAVED VALUE OF HL 
RET 
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FUNCTION: PRVAL 

INPUTS: A - INTEGER, RANGE 0 TO F 

OUTPUTS: A - ASCII CHARACTER 

CALLS: NOTHING 

DESTROYS: B,C,H,L,F/F'S 

DESCRIPTION: PRVAL CONVERTS A NUMBER IN THE RANGE 0 TO F HEX TO 
THE CORRESPONDING ASCII CHARACTER, 0-9, A-F. PRVAL 
DOES NOT CHECK THE VALIDITY OF ITS INPUT ARGUMENT. 


PRVAL: 
LXI H,DIGTB ; ADDRESS OF TABLE 
MVI B,0 ; CLEAR HIGH ORDER BITS OF BC 
DAD B ; ADD DIGIT VALUE TO HL ADDRESS 
MOV C,M ; FETCH CHARACTER FROM MEMORY 
RET 
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7 
7 


7 


FUNCTION: REGDS 
INPUTS: NONE 
OUTPUTS: NONE 


O6ea 
O6ea 
06ed 
06ed 
O6ee 
Obef 
06£0 
06£3 
06f6 
06f7 
O6£7 
06fa 
O6fc 
O6fft 
0700 
0701 
0703 
0704 
0705 
0708 
0709 
070a 
070d 
070e 
O70£ 
0712 
0712 
0714 
0717 
0718 


071b 
071b 
O71le 
0721 
0721 
0722 
0723 
0726 
0727 
072a 
072b 
072e 
072e 
O72£ 
0730 
0731 


21 


de 
719 
b7 
c2 
cd 
cQ 


cd 
Oe 
cd 
23 
5e 
16 
23 
la 
cd 
Te 
b7 
ca 
1b 
la 
cd 


Oe 
cd 
23: 
a3 


2, 
11 


Te 
b7 
ca 
b9 
ca 
19 
a3 


23 
44 
4d 
eo. 


d5 


£7 
eb 


£8 
3d 
£8 


08 


c7 


12 


c7 


20 
£8 


ed 


d5 
03 


LE 


28 


21 


07 


06 


05 


05 


05 


06 


07 


06 


05 


06 


07 
00 


06 


07 


07 


7 
7 


7 


REG10: 


REG15: 


I IR IR IOI I IRR IR IORI IORI OI I IO OI IO Ik 


CALLS: 


ECHO, NMOUT, ERROR, CROUT 


DESTROYS: A,B,C,D,E,H,L,F/F'S 
DESCRIPTION: REGDS DISPLAYS THE CONTENTS OF THE REGISTER SAVE 


LOCATIONS, 


IN FORMATTED FORM, ON THE CONSOLE. 


THE 


DISPLAY IS DRIVEN FROM A TABLE, RTAB, WHICH CONTAINS 


THE REGISTER'S PRINT SYMB 


AND LENGTH (8 OR 16 BITS). 
LXI H,RTAB ; LOAD HL WITH ADDRESS OF START OF TABLE 
MOV C,M ; GET PRINT SYMBOL OF REGISTER 
MOV A,C 
ORA A ; TEST FOR 0 -END OF TABLE 
INZ REG10 ; IF NOT END, BRANCH 
CALL CROUT ; ELSE, CARRIAGE RETURN/LINE FEED TO END 
RET ; /DISPLAY 
CALL ECHO ; ECHO CHARACTER 
MV Cc, '=! 
CALL ECHO ; OUTPUT EQUALS SIGN, I.E. A = 
NX H ; POINT TO START OF SAVE LOCATION ADDRESS 
(OV E,M ; GET LSP OF SAVE LOCATION ADDRESS TO E 
MV D,RAMST SHR 8 ; PUT MSP OF SAVE LOC ADDRESS INTO 0 
NX H ; POINT TO LENGTH FLAG 
LDAX D ; GET CONTENTS OF SAVE ADDRESS 
CALL NMOUT ; DISPLAY ON CONSOLE 
OV A,M ; GET LENGTH FLAG 
ORA A ; SET SIGN F/F 
JZ REG15 ; IF 0, REGISTER IS 8 BITS 
DCX D ; ELSE, 16 BIT REGISTER SO MORE TO DISPLAY 
LDAX D ; GET LOWER 8 BITS 
CALL NMOUT ; DISPLAY THEM 
MVI Caius 
CALL ECHO ; OUTPUT BLANK CHARACTER 
INX H ; POINT TO START OF NEXT TABLE ENTRY 
JMP REGO5 ; DO NEXT REGISTER 


FUNCTION: RGADR 


OL, 


SAVE LOCATION ADDRESS, 


N RTAB CORRESPONDING TO REGISTER 


INPUTS: C - CHARACTER DENOTING REGISTER 
OUTPUTS: BC - ADDRESS OF ENTRY 
CALLS: ERROR 


DESTROYS: A,B,C,D,E,H,L,F/F'S 


DESCRIPTION: RGADR TAKES A SINGLE CHARACTER AS INPUT. THIS CHARACTER 


DENOTES A REGISTER. RGADR 
FOR A MATCH ON THE INPUT 
RGADR RETURNS THE ADDRESS 
SAVE LOCATION CORRESPONDI 
ADDRESS POINTS INTO RTAB. 


SEARC 


G TO 


ARGUMENT. 
OF THE ADDRESS OF THE 


HES THE TABLE RTAB 
IF ONE OCCURS, 
THE REGISTER. THIS 

THEN 


IF NO MATCH OCCURS, 


THE REGISTER IDENTIFIER IS ILLEGAL AND CONTROL IS 


PASSED TO THE ERROR ROUTINE. 


RGADR: 
LXI H,RTAB 
LXI D,RTABS 
RGAOS: 
MOV A,M 
ORA A 
JZ ERROR 
CMP G 
JZ RGA10 
DAD D 
JMP RGAO5 
RGA10: 
INX H 
MOV B,H 
MOV oven 
RET 


7 
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I IIR I IR II OR IR IOI II IO I IO Ik 


7 


7 


7 


H 
D 


/ 


L GETS ADDRESS OF TABLE START 
E GET SIZE OF A TABLE ENTRY 


ET REGISTER IDENTIFIER 

HECK FOR TABLE END (IDENTIFIER IS (0) 

F AT END OF TABLE, ARGUMENT IS ILLEGAL 

LSE, COMPARE TABLE ENTRY AND ARGUMENT 

F EQUAL, WE'VE FOUND WHAT WE'RE LOOKING FOR 
LSE, INCREMENT TABLE POINTER TO NEXT ENTRY 
RY AGAIN 

F A MATCH, INCREMENT TABLE POINTER TO 

SAVE LOCATION ADDRESS 


RETURN THIS VALUE 


; FUNCTION: SRET 

; INPUTS: NONE 

; OUTPUTS: CARRY = 1 

; CALLS: NOTHING 

; DESTROYS: CARRY 

; DESCRIPTION: SRET IS JUMPED TO BY ROUTINES WISHING TO RETURN SUCCESS. 


; SRET SETS THE CARRY TRUE AND THEN RETURNS TO THE 
; CALLER OF THE ROUTINE INVOKING SRET. 

0732 SRET: 

0732 27. STC ; SET CARRY TRUE 

0733 cQ RET ; RETURN APPROPRIATELY 
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; FUNCTION: STHFO 

; INPUTS: DE - 16 BIT ADDRESS OF BYTE TO BE STORED INTO 

; OUTPUTS: NONE 

; CALLS: NOTHING 

; DESTROYS: A,B,C,H,L,F/EF'S 

; DESCRIPTION: STHFO CHECKS THE HALF BYTE FLAG IN TEMP TO SEE IF 


? IT IS SET TO LOWER. IF SO, STHFO STORES A 0 TO 
3 PAD OUT THE LOWER HALF OF THE ADDRESSED BYTE 
7 OTHERWISE, THE ROUTINE TAKES NO ACTION. 
0734 STHFO: 
0734 3a fd 08 LDA TEMP ; GET HALF BYTE FLAG 
0737 b7 ORA A ; SET F/F'S 
0738 c0 RNZ ; IF SET TO UPPER, DON'T DO ANYTHING 
0739 Oe 00 MVI C0 ; ELSE, WANT TO STORE THE VALUE 0 
073b ed 38.07 CALL STHLF 3 DOALT 
073e c9 RET 
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; FUNCTION: STHLF 

; INPUTS: C - 4 BIT VALUE TO BE STORED IN HALF BYTE 

; DE - 16 BIT ADDRESS OF BYTE TO BE STORED INTO 
; OUTPUTS: NONE 
; CALLS: NOTHING 

; DESTROYS: A,B,C,H,L,F/F'S 

; DESCRIPTION: STHLF TAKES THE 4 BIT VALUE IN C AND STORES IT IN 


; HALF OF THE BYTE ADDRESSED BY REGISTERS DE. THE 
; HALF BYTE USED (EITHER UPPER OR LOWER) IS DENOTED 
; BY THE VALUE OF THE FLAG IN TEMP. STHLF ASSUMES 
; THAT THIS FLAG HAS BEEN PREVIOUSLY SET 
; (NOMINALLY BY ICMD) . 

073£ STHLF: 

073£ d5 PUSH D 

0740 el POP H ; MOVE ADDRESS OF BYTE INTO HL 

0741 fh) MOV A,C ; GET VALUE 

0742 e6 Of ANT OFH ; FORCE TO 4 BIT LENGTH 

0744 4f MOV C,A ; PUT VALUE BACK 

0745 3a fd 08 LDA TEMP ; GET HALF BYTE FLAG 

0748 b7 ORA A ; CHECK FOR LOWER HALF 

0749 c2 52 07 JNZ STHOS ; BRANCH IF NOT 

074c 7e MOV A,M ; ELSE, GET BYTE 

074d e6 £0 ANT OFOH ; CLEAR LOWER 4 BITS 

O74£ bl ORA © 7 OR IN VALUE 

0750 hil MOV M,A ; PUT BYTE BACK 

0751 Co. RET 

0752 STHOS: 

0752 Te MOV A,M ; IF UPPER HALF, GET BYTE 

0753 e6 Of ANI OFH ; CLEAR UPPER 4 BITS 

0755 47 MOV B,A ; SAVE BYTE IN B 

0756 719 MOV A,C 7; GET VALUE 

0757 Of RRC 

0758 Of RRC 

0759 Of RRC 

O75a Of RRC ; ALIGN TO UPPER 4 BITS 

075b bO ORA B 7 OR IN ORIGINAL LOWER 4 BITS 


075¢c 
075d 


075e 
075e 
O75£ 
0761 
0764 
0766 
0769 
076c 
O076e 
0771 
0773 
0776 


0779 
0779 
O77a 
O77c 
O77£ 
0781 
0784 
0786 
0789 


078c 
078c 
078d 
078e 
0790 
0790 
0793 
0794 
0795 
0796 


77 
cQ 


79 
fe 
fa 
fe 
fa 
ca 
fe 
fa 
fe 
£2 
c3 


79 
fe 
ca 
fe 
ca 
fe 
ca 
c3 


cd 


30 
lc 
39 
32 
32 
4l 
Le 
47 
ie 
32 


2¢ 
32 
Od 
32 
20 
32 
1c 


73 


c4 


06 


07 
07 


06 


06 
07 


07 


07 


07 
06 


05 


MOV M,A ; PUT NEW CONFIGURATION BACK 
RET 


I I IR IR IIR IR IR IO IO I IO I I AO Ik 


FUNCTION: VALDG 

INPUTS: C - ASCII CHARACTER 

OUTPUTS: CARRY - 1 IF CHARACTER REPRESENTS VALID HEX DIGIT 

- 0 OTHERWISE 

CALLS: NOTHING 

DESTROYS: A,F/F'S 

DESCRIPTION: VALDG RETURNS SUCCESS IF ITS INPUT ARGUMENT IS 
AN ASCII CHARACTER REPRESENTING A VALID HEX DIGIT 
(0-9,A-F), AND FAILURE OTHERWISE. 


VALDG: 

MOV A,C 

CPI "OQ! ; TEST CHARACTER AGAINST '0! 

uM FRET ; IF ASCII CODE LESS, CANNOT BE VALID DIGIT 
CPI 9! ; ELSE, SEE IF IN RANGE '0'-'9! 

uM SRET ; CODE BETWEEN '0' AND '9! 

pr SRET ; CODE EQUAL '9! 

CPI "AN ; NOT A DIGIT - TRY FOR A LETTER 

uM FRET ; NO - CODE BETWEEN '9' AND 'A! 

CPI "Gg! 

JP FRET ; NO - CODE GREATER THAN 'F'! 

UMP SRET ; OKAY - CODE IS 'A' TO 'F', INCLUSIVE 
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FUNCTION: VALDL 

INPUTS: C - CHARACTER 

OUTPUTS: CARRY - 1 IF INPUT ARGUMENT VALID DELIM'fER 
- 0 OTHERWISE 

CALLS: NOTHING 

DESTROYS: A,F/F'S 


; DESCRIPTION: VALDL RETURNS SUCCESS IF ITS INPUT ARGUMENT IS A VALID 
; DELIMITER CHARACTER (SPACE, COMMA, CARRIAGE RETURN, 
; AND LINE FEED) FAILURE OTHERWISE. 
VALDL: 

MOV A,C 

CPI r,! ; CHECK FOR COMMA 

JZ SRET 

CPL CR ; CHECK FOR CARRIAGE RETURN 

JZ SRET 

CPI te ; CHECK FOR SPACE 

JZ SRET 

JMP FRET ; ERROR IF NONE OF THE ABOVE 
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FUNCTION: COUT8279 

INPUTS: C - CHARACTER 

CALLS: CO 

DESCRIPTION: SEND CONTROL BYTE TO 8279 CONTROLLER 


COUT8279: 
PUSH B 
PUSH PSW 
MVI C,073H 
CDOUT: 
CALL CO 
DI 
POP PSW ; A is detroyed in COo2 ! 
MOV C,A 
JMP CO2 


0799 
0799 
079a 
079b 
079a 


07a0 
07a0 
O7al 
07a3 
07a6 
O7al7 


O7aa 
O7aa 
O7ae 
0007 


O7b1 
O7b1 
07b3 
07b5 
O7b7 
07b9 
O7bb 
O7bd 


O7bE 
O7bf 
07c0 
O7cl1 
O7c2 
07c3 
07c4 
0006 


07c5 
O7c5 
07c6 
O7c7 
07c8 
O7c9 
O7ca 
O7cb 
O7cc 
O7cd 
O7ce 
O7c£ 


cS 
£5 
Oe 
a3 


cS 
Oe 
cd 
cl 
G3 


Od 
4b 


00 
14 
£0 
do 
86 
68 
37 


44 
47 
49 
4d 
53 
58 


30 
31 
32. 
33 
34 
35 
36 
37 
38 
39 
41 


712 
90 O07 


Ta 
c4 05 


90 05 


Oa 53 44 
Od 0a 


00 
05 
04 
04 
04 
04 
04 


7 
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+ FUNCTION: DOUT8279 
; INPUTS: C - CHARACTER 
7 CALLS: CO 


; DESCRIPTION: SEND DATA BYTE TO 8279 CONTROLLER 


7 


DOUT8279: 
PUSH B 
PUSH PSW 
MVI C,072H 
UMP CDOUT 
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+ FUNCTION: DIN8279 

; INPUTS: C - CHARACTER 

; CALLS: NOTHING 

; DESCRIPTION: READ DATA BYTE FORM 8279 CONTROLLER 


7 


DIN8279: 
PUSH B 
MVI C,07AH 
CALL CO 
POP B 
UMP CI 
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; MONITOR TABLES 
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SGNON: ; SIGNON MESSAGE 
DB CR, LF, 'SDK', CR, LF 
LSGNON EQU S-SGNON ; LENGTH OF SIGNON MESSAGE 
CADR: ; TABLE OF ADDRESSES OF COMMAND ROUTINES 
DW 0 ; DUMMY 
DW XCMD 
DW SCMD 
DW MCMD 
DW ICMD 
DW GCMD 
DW DCMD 
CTAB: ; TABLE OF VALID COMMAND CHARACTERS 
DB "Dt 
DB re 
DB "Tr! 
DB ™! 
DB “sY 
DB ny! 
NCMDS EQU $S-CTAB ; NUMBER OF VALID COMMANDS 
DIGTB: ; TABLE OF PRINT VALUES OF HEX DIGITS 
DB 0! 
DB mt 
DB "2! 
DB "3" 
DB "4! 
DB eit 
DB "6! 
DB "7! 
DB g! 
DB gt 
DB "AY 


07d0 42 DB 1B. 
O7d1 43 DB “Gu 
07d2 44 DB 'D' 
07d3 45 DB 'E! 
0704 46 DB 'F! 
07d5 RTAB: ; TABLE OF REGISTER INFORMATION 
07d5 41 DB 'A' ; REGISTER IDENTIFIER 
07d6 ee DB ASAV AND OFFH ; ADDRESS OF REGISTER SAVE LOCATION 
O7d7 00 DB 0 ; LENGTH FLAG - 0=8 BITS, 1=16 BITS 
0003 RTABS EQU S-RTAB 7; SIZE OF AN ENTRY IN THIS TABLE 
07d8 42 DB 'B! 
07da9 ec DB BSAV AND OFFH 
O7da 00 DB 0 
O07db 43 DB Ge 
O7dc eb DB CSAV AND OFFH 
07dd 00 DB 0 
O07de 44 DB 'D! 
O7d£ ea DB DSAV AND OFFH 
07e0 00 DB 0 
O7el 45 DB 'E! 
O7e2 e9 DB ESAV AND OFFH 
07e3 00 DB 0 
07e4 46 DB 'F! 
O7e5 ed DB FSAV AND OFFH 
07e6 00 DB 0 
O7e7 49 DB Peles ; NEW: ISAV WAS MISSING 
O7e8 Bi DB ISAV AND OFFH 
07e9 00 DB 0 
O7ea 48 DB 'H' 
O7eb £0 DB HSAV AND OFFH 
O7ec 00 DB 0 
O7ed 4c DB 'L! 
O7ee ef DB LSAV AND OFFH 
O7ef 00 DB 0 
07£0 4d DB 'M' 
O7f1 £0 DB HSAV AND OFFH 
07f2 01 DB 
07£3 23 DB "se 
o7f4 £5 DB SSAV+1 AND OFFH 
07£5 ol DB 
O7f6 50 DB "pt 
O7£7 £3 DB PSAV+1 AND OFFH 
07f8 ol DB 
O7£9 00 DB 0) 7; END OF TABLE MARKERS 
7 DB 0) 
O7fa ORG BRTAB 
O7fa c3 c4 05 JMP CO ; BRANCH TABLE FOR USER ACCESSIBLE ROOTINES 
O7fd c3 90 05 JMP cI 
; KEKKKKKKKKKKKKKKK KK KK KK KK ARK KKKKKK KK KKKKKK KK KKKK KK KK KKKK KKK KKK KKK 
; IN THE FOLLOWING LOCATIONS, THE USER MAY PLACE JUMP INSTRUCTIONS TO 
; ROUTINES FOR HANDLING THE FOLLOWING:- 
- A) RST 5,6 & 7 INSTRUCTIONS 
? B) HARDWIRED USER INTERRUPT (RST 6.5 
3 C) KEYBOARD "VECTORED INTERRUPT" KEY (RST 7.5) 
0800 ORG USRBR ; START OF USER BRANCH LOCATIONS 
0800 00 00 00 RSET5: DB 0,0,0 ; JUMP TO RST 5 ROUTINE 
0803 00 00 00 RSET6: DB 0,0,0 ; JUMP TO RST 6 ROUTINE 
0806 00 00 00 RST65: DB 0,0,0 ; JUMP TO RST 6.5 (HARDWIRED USER INTERRUPT) 
0809 00 00 00 RSET7: DB 0,0,0 ; JUMP TO RST 7 ROUTINE 
080c 00 00 00 USINT: DB 0,0,0 ; JUMP TO "VECTORED INTERRUPT" KEY ROUTINE 


ee ee ee ee ee es 


; SPACE IS RESERVED HERE FOR THE USER STACK 


ee ee ed 


08c7 


08e9 


08e9 
08ea 
08eb 
08ec 
08ed 
08ee 
O8ef 
08f0 
O8f1 
08f2 
O08 £2 
08f3 
ost4 
os8f4 
O8f5 


O8f6 
08f8 
O08f9 
08fd 


O8fd 


08fe 
Osft 


0900 


00 
00 
00 
00 
00 
00 
00 
00 
00 


00 
00 


00 
00 


00 
00 


00 
00 
00 


00 


ORG 


USRSTK 


; START OF USER STACK 


ee ee ee ee ee ee ee ed 


; SPACE IS RESERVED HERE FOR THE MONITOR STACK 


ee ee ed 


7; SAVE 
ESAV: 
DSAV: 
CSAV: 
BSAV: 
FSAV: 
ASAV: 
LSAV: 
HSAV: 
ISAV: 
PSAV: 
PCLSV: 
PCHSV: 
SSAV: 
SPLSV: 
SPHSV: 
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ORG 


MNSTK 


LOCATIONS 


DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 
DB 


DB 
DB 


DB 
DB 


OS: O'S O'S 10: 1; SS 


o 
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START OF MONITOR STACK 


USER REGISTERS 


7 


7 


7 


E REGISTER 

D REGISTER 

C REGISTER 

B REGISTER 

FLAGS 

A REGISTER 

L REGISTER 
REGISTER 

NTERRUPT MASK 

PROGRAM COUNTER 

LOW ORDER BYTE 

IGH ORDER BYTE 

STACK POINTER 

LOW ORDER BYTE 

IGH ORDER BYTE 


r 


ee ee ee ee ed 


; MONITOR STORAGE LOCATIONS 


CURAD: 
CURDT: 
OBUFF: 
TEMP: 


RGPTR: 
IBUFF: 
USCSR: 


DW 
DB 
DS 


DB 
DB 
DB 


END 


7 
7 
7 
7 
7 
7 
7 
7 
; 
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CURRENT ADDRESS 

CURRENT DATA 

OUTPUT BUFFER 

TEMPORARY LOCATION FOR TTY MONITOR 

TEMPORARY LOCATION FOR SINGLE STEP ROUTIINE 
REGISTER POINTER 

INPUT BUFFER 

USER SHOULD STORE IMAGE OF CSR HERE EACH TIME 
/CSR IS CHANGED. OTHERWISE, SINGLE STEP 
/ROUTINE WILL DESTROY CSR CONTEIITS. 


0000 
039a 
O7b1 
O5al 
007b 
0064 
05c6 
O5eb 
O7bE 
0449 
05f1 
0001 
0001 
05f£8 
0215 
0092 
0005 
00ec 
O61f 
062c 
0685 
O3fa 
042d 
0267 
06a0 
08fe 
04c7 
Oofft 
000a 
000e 
0011 
000a 
04d8 
0006 
0000 
00cd 
02c9 
O8f2 
06e2 
02e7 
0712 
02fa 
02fc 
O3ed 
0809 
031b 
0500 
03a6 
08f5 
O0fd 
O73£ 
0142 
019c 
O8fd 
000d 
OO00f 
Oofft 
08c7 
0000 
054e 
0587 


0090 
001b 
0790 
Ole9 
0087 
O05bb 
0011 
08eb 
O8fé 
045e 
O7c5 
0799 
0008 
0008 
0611 
009d 
2000 
047d 
0408 
0645 
068a 
00cb 
0232 
022b 
08£f0 
0491 
0486 
O8f1 
000b 
OO00f 
0012 
0000 
04d0 
OO00f 
0004 
08f9 
O2dc 
0010 
O8f2 
0040 
O6ea 
0721 
0309 
0017 
032d 
0705 
0510 
O3aa 
O8t4 
0080 
0040 
0145 
01c4 
001b 
000c 
000e 
O8ff 
075e 
0527 
0567 
0514 


ADISP 
BRCHR 
CDOUT 
CLDIS 
CMD15 
CNVBN 
COMMA 
CSAV 
CURAD 
DCM15 
DIGTB 
DOUT8279 
DTMSK 
EIGHT 
ERROR 
EXMO5 
FRERAM 
GCM05 
GETCM 
GHX10 
GNM20 
GOCMD 
GTHO5 
GTHEX 
HSAV 
CM05 
CMD 
SAV 
LETRB 
LETRF 
LETRP 
LOWER 
MCMD 
EWLN 
UMC 
OBUFF 
OUT20 
PERIO 
PSAV 
READ 
REGDS 
RGAOS5S 
RGNAM 
RMUSE 
RSRO5S 
RTAB 
SCM15 
SGNDT 
SPLSV 
SSTRT 
STOPB 
STP23 
SUB10 
TERM 
TIMLO 
UNMSK 
USCSR 
VALDG 
XCMO5 
XCM20 
XCMD 


08ee 
O7fa 
0590 
01f1 
037c 
05c4 
078c 
0000 
O8£f8 
0437 
07a0 
08ea 
0601 
0080 
08e9 
00b8 
061c 
0483 
0626 
0662 
0695 
0414 
0249 
OOoof 
026c 
04b9 
028e 
00cc 
000c 
0010 
0014 
08ef 
08e9 
06c7 
000d 
02c2 
02b7 
O00fb 
0800 
O6ed 
003£ 
072e 
O3ac 
0800 
0331 
0003 
04£0 
O7aa 
0732 
0752 
0126 
0157 
Olcft 
0334 
0040 
O35f 
080c 
0779 
0536 
O57e 
0000 


ASAV 
BRTAB 
CI 
CLDST 
CMDAD 
co 
COUT8279 
CSNIT 
CURDT 
DCMD 
DIN8279 
DSAV 


0015 
08ec 
0592 
01d7 
0378 
O5cb 
000d 
0008 
043e 
0094 
0200 
0384 
O60f 
039e 
001b 
03a2 
08ed 
0468 
065b 
0677 
0699 
0421 
0255 
O06cl 
00cd 
04cl1 
O29f 
0000 
000d 
0013 
0005 
0007 
O3ff 
03b9 
02a8 
02c6 
08£3 
OOfE 
02£3 
06f7 
O2£7 
O071b 
O8fd 
0803 
0806 
04f£5 
0344 
00le 
os8f4 
0734 
013b 
00c0 
018b 
00c5 
00c0 
036b 
0800 
0066 
0543 
O57£ 


